Cấu trúc rẽ nhánh và lặp

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Phan Thị Khánh Huyền

Viết chương trình lập từ bàn phim 2 số nguyên dương M,N (M < N ) tính và đưa ra màn hình tổng số có 2 chữ số chia hết cho 3 hoặc chia hết cho 2 trong phạm vi từ M đến N

Nguyễn Lê Phước Thịnh
7 tháng 11 2019 lúc 16:15

quá dễ

uses crt;
var m,n,i,t,t1:integer;
begin
clrscr;
repeat
write('m='); readln(m);
write('n='); readln(n);
if m>=n then writeln('ban da nhap sai, yeu cau ban nhap lai');
until m<n;
t:=0;
t1:=0;
for i:=m to n do
begin
if (i>=10) and (i mod 3=0) then t:=t+i;
if (i>=10) and (i mod 2=0) then t1:=t1+i;
end;
writeln('tong cac so co 2 chu so chia het cho 3 trong khoang tu ',m,' toi ',n,' la: ',t);
writeln('tong cac so co 2 chu so chia het cho 2 trong khoang tu ',m,' toi ',n,' la: ',t1);
readln;
end.

Khách vãng lai đã xóa

Các câu hỏi tương tự
chương nguyễn
Xem chi tiết
Hạ Nhật
Xem chi tiết
van hoan Dao
Xem chi tiết
phươngplayergamer
Xem chi tiết
Vũ Ngọc Lan
Xem chi tiết
phạm hương trà
Xem chi tiết
Nguyễn Thị Hồng Ngọc
Xem chi tiết
Nguyễn Thị Hồng Ngọc
Xem chi tiết
van hoan Dao
Xem chi tiết