Người hay giúp bạn khác trả lời bài tập sẽ trở thành học sinh giỏi. Người hay hỏi bài thì không. Còn bạn thì sao?

• Mới nhất
• Chưa trả lời
• Câu hỏi hay
• Câu hỏi của tôi

Han Pham thi ngoc4 phút trước

Viết chương trình

a) nhập từ bàn phím các số nguyên cho mảng a gồm 10 phần tử

b) điểm trong mảng a có bao nhiêu số chia hết cho 5

0 câu trả lờiTin học lớp 11 Kiểu dữ liệu có cấu trúcBài 11: Kiểu mảngnguyen thi khanh nguyen11 giờ trước (21:14)

Viết chương trình đếm số lượng phần tử chẵn trong mảng 1 chiều

1 câu trả lờiTin học lớp 11 Kiểu dữ liệu có cấu trúcBài 11: Kiểu mảngNguyễn Lê Phước Thịnh11 giờ trước (21:58)

uses crt;

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

i,n,dem:integer;

begin

clrscr;

write('n='); readln(n);

for i:=1 to n do

begin

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

end;

{-------------------------------------------------------------}

dem:=0;

for i:=1 to n do

if a[i] mod 2=0 then inc(dem);

writeln('so phan tu chan trong day la: ',dem);

readln;

end.