Ôn tập cuối năm

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Kiên Phạm

Hãy nhập vào 2 số nguyên m và n đưa ra màn hình những số chia hết cho 3 vào 5 trong phạm vi từ m đến n

HT.Phong (9A5)
23 tháng 2 2023 lúc 11:19

Uses crt;

Var m,n,i,s: longint;

Begin clrscr;

Write ('nhap m:'); readln (m);

Write ('nhap n:'); readln (n);

While n <m do

Begin

Write ('nhap lai n:');

Readln (n);

End;

S:=0;

For i:=m to n do

If (i mod 3=0) or (i mod 5=0) then s:=s+i;

Write(s);

Readln;

end.


Các câu hỏi tương tự
Thanh Phạm
Xem chi tiết
Nguyễn Cẩm ly
Xem chi tiết
M Ạ C H N H A
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Nguyễn Mai
Xem chi tiết
Hoàn Trần
Xem chi tiết
hùng tín trang
Xem chi tiết
Be Long
Xem chi tiết