Kiểu dữ liệu có cấu trúc

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Charlotte Grace

Cho mang 1 chieu gom cac phan tu nguyen. Viet chuong trinh nhap gtri cho tung phan tu. Ddeems va hien ra nhung phan tu co gtri \(⋮\) 3.

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

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] mod 3=0 then 

begin

inc(dem);

write(a[i]:4);

end;

writeln;

writeln('So phan tu chia het cho 3 la: ',dem);

readln;

end.


Các câu hỏi tương tự
Charlotte Grace
Xem chi tiết
le xuan huong
Xem chi tiết
Lâm Nguyên Khôi
Xem chi tiết
Như Quỳnh Nguyễn
Xem chi tiết
Nguyễn Mỹ Uyên
Xem chi tiết
Lan Trương (Lan Mèo)
Xem chi tiết
CHANNANGAMI
Xem chi tiết
Thi Đua Khen Thưởng
Xem chi tiết
Nguyễn Phan Thảo Ngân
Xem chi tiết