Bài 3: Cấu trúc chương trình

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

Bài 1 viết chư ơng trình pascal nhập vào 2 số nguyên m và n đưa ra màn hình tổng số chia hết cho 3 và 5 từ m đến N

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

uses crt;

var m,n,t,i:integer;

begin

clrscr;

repeat

write('Nhap n='); readln(n);

write('Nhap m='); readln(m);

until m<n;

t:=0;

for i:=m to n do 

  if (i mod 3=0) and (i mod 5=0) then t:=t+i;

writeln('Tong cac so chia het cho 3 va 5 trong khoang tu ',m,' toi ',n,' la: ',t);

readln;

end. 


Các câu hỏi tương tự
Pham Uyen
Xem chi tiết
nguyễn đình anh tuấn
Xem chi tiết
Quỳnh như
Xem chi tiết
Nguyễn Thành Dương
Xem chi tiết
Red Duy
Xem chi tiết
Nông trang
Xem chi tiết
Nguyễn Ái Quyên
Xem chi tiết
Hân Nguyễn Ngọc Quỳnh
Xem chi tiết
Đồng Tươi
Xem chi tiết