Bài 3. Chương trình máy tính và dữ liệu

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Hồ Thị Xuân Nhi

Đề 14 : Viết chuingw trình nhập n số nguyên . Đếm các số vừa chia hết cho 2 vừa chia hết cho 3 . Xuất kết quả ra màn hình

Help me mai mình kiểm tra thực hành rồi giúp mình với nha everyody -.- !!

Nguyễn Trung Hiếu
9 tháng 5 2019 lúc 20:59

uses crt;
Var a:array[1..100000] of longint;
i,n,d:longint;
Begin
clrscr;
write('Nhap n: '); readln(n);
For i:=1 to n do
Begin
Write('A[',i,'] = '); Readln(A[i]);
end;
for i:=1 to n do
if (a[i] mod 2=0) and (a[i] mod 3=0) then inc(d);
write('Co ',d,' so vua chia het cho 2 vua chia het cho 3');
readln
end.


Các câu hỏi tương tự
Hồ Thị Xuân Nhi
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết
20. Nguyễn Tô Bảo Ngân 8...
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết
Mộc Trà
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết
Hồ Thị Xuân Nhi
Xem chi tiết