Bài 7. Câu lênh lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Công chúa Anime

viết chương trình đếm số dương trong dãy n số nguyên

Nguyễn Lê Phước Thịnh
2 tháng 2 2021 lúc 21:25

uses crt;

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

i,n,dem:integer;

begin

clrscr;

write('Nhap 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]>0 then inc(dem);

writeln('So luong so duong la: ',dem);

readln;

end.


Các câu hỏi tương tự
Đạt Nguyễn
Xem chi tiết
Gia Kỳ
Xem chi tiết
Tuân Trần
Xem chi tiết
Lâm Khả Doanh
Xem chi tiết
Bao Duong
Xem chi tiết
Lan Phương
Xem chi tiết
Mai thị tố uyên
Xem chi tiết
Trần Đức Huy
Xem chi tiết
Phong
Xem chi tiết