var i,d:byte;
a: array [1..10] of integer;
begin
for i:=1 to 10 do
write('Nhap phan tu thu ',i,' : '); read(a[i]);
if a[i] mod 5 =0 then inc(d);
end;
write('So phan tu chia het cho 5: ',d);
readln
end.
uses crt;
var a:array[1..10] of integer;i,d:integer;
clrscr;
for i:=1 to 10 do readln(a[i]);
d:=0;
for i:=1 to 10 do if a[i] mod 5=0 then d:=d+1;
wrrite(d);
Làm giúp mk với mk đang cần gấp
Chuyển các phân số thành số thập phân : 7/5; 9/8; 11/25; 31/50; 13/20; 5/2
KHÔNG SỬ DỤNG THUỐC THỬ MgSO4,Na2CO3,nAOH,Hcl
II. Circle the word in each group that has the underlined part pronounced differently from the rest: 1. A. cheap B. match C. chore D. machine 2. A. resource B. scout C. sound D. proud 3. A. recycle B. sky C. century D. why 4. A. equipment B. comment C. improvement D. development
1,5 giờ = ... phút. Số thích hợp điền vào chỗ chấm là: 60A. 90B. 120C. 150D
tính S=1+(-3)+5+(-7)+......+21+(-23) giải thik chi tiết từng bước giải xong mik vote 5 sao cảm ơn nhiều ạ
Cho hình bình hành ABCD có AB = 3a; BC = 2a√2; góc B tù; diện tích hình bình hành = 6a Tính độ dài đường chéo BD
Viết 1 đoạn văn ngắn từ 5-7 câu có sử dụng hình thức rút gọn câu gạch chân dưới câu đó và nêu tác dụng của nó
Cho biết những nét tương đồng và riêng biệt trong sản xuất và sinh hoạt của các nước ĐNA?
Dat cau voi cac tu How many , How much
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến