Viết chương trình sử dụng biến mảng để nhập từ bàn phím các phần tử của một dãy số nguyên. Độ dài của dãy cũng được nhập từ bàn phím. In ra màn hình có bao nhiêu giá trị là số lẻ

bkchoc230801

2 năm trước

Loga Sinh Học lớp 12

0 lượt thích 67 xem

1 trả lời

Thích Trả lời

nguyenphuongthao27102001

program bt;

uses crt;

var a: array[1..100] of integer;

i, n, le: integer;

begin

clrscr;

write('Nhap n la:'); readln(n);

for i := 1 to n do begin

writeln('Nhap a[', i ,']=');

readln(a[i]);

end;

le := 0;

for i := 1 to n do if a[i] mod 2 <> 0 then le := le + 1;

writeln('Co', le ,' so le co trong mang');

readln

end.

Xin câu trả lời hay nhất ạ :3

Vote (0) Phản hồi (0) 2 năm trước

Lanhuong23

program bt;

uses crt;

var a:array[1..1000] of integer;

i,n,tong,tich:integer;

begin

clrscr;

write('Do dai cua day la:'); readln(n);

for i:=1 to n do

begin

write('a[',i,']='); readln(a[i]);

end;

tong:=0; tich:=1;

for i:=1 to n do

begin

tong:=tong + a[i];

tich:=tich*a[i];

end;

write('tong cac so tu nhien nhap tu ban phim:',tong);

writeln;

write('tich cac so tu nhien nhap tu ban phim:',tich);

readln

end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

qua văn bản hịch tướng sĩ em hay viết đoạn văn (10-12) làm sáng tỏ luận điểm

Mọi người giúo em với ạ em đang cần gấp

Giúp mình câu 5 với ạ và kiểm tra hộ mình xem mấy câu 1,2,3,4 xem có đúng không ạ Mình cảm ơn

giải hết hộ mk vs chiều mk thì gấp òi :<<<<

Có ý kiến cho rằng . Ngòi việc học chúng ta nên giúp đỡ ba mẹ công việc nhà

Em hãy so sánh diện tích của 5 châu lục mà em đã tìm hiểu châu Mỹ châu phi châu Nam cực Châu Đại Dương Châu âu theo thứ tự từ nhỏ đến lớn?

Tính và so sánh: √(16.25) và √16 . √25.

Dì Năm nuôi 4 con gà mái đẻ. Dì nhận thấy rằng một con đẻ cách nhật ( 2 ngày đẻ 1 quả ). nột con 3 ngày đẻ 1 quả. một con cứ 4 ngày và con cứ 7 ngày mới cho 1 quả. Vào một ngày đẹp trời dì mở cửa chuồng gà thấy có 4 quả trứng hồng tươi trên ổ. Dì hớn hở đem khoe với hàng xóm. Họ rất tốt với Dì và nói: " Cầu trời tháng sau lại ban cho niềm vui như vậy ". Bạn hãy cho biết lời chúc đó có đạt được không, sau bao lâu thì đạt được. Giải giúp mk với ạ. Giải thích chi tiết nữa ạ

Ai giải giúp mình bài này với ạ đang cần gấp ạ

tai sao cần bón phân hữu cơ hoai mục cho cây ? cần phải lấp đất kín giúp mik nhanh vs các bn

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến