Ôn tập cuối năm

Anh Kieu

Viết chương trình tính tổng các số không chia hết cho 5 của 100 số nguyên dương đầu tiên xuất kết quả ra màn hình làm nhanh giúp em ạ

Nguyễn Lê Phước Thịnh
22 tháng 12 2022 lúc 10:09

uses crt;

var i,t:integer;

begin

clrscr;

t:=0;

for i:=1 to 100 do

if i mod 5<>0 then t:=t+i;

writeln(t);

readln;

end.

Bình luận (0)

Các câu hỏi tương tự
Hiep Ho
Xem chi tiết
Hoàn Trần
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Duy
Xem chi tiết
Tuấn
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Phan Tú
Xem chi tiết
M Ạ C H N H A
Xem chi tiết