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.
