Viết chương trình nhập vào các số từ M đến N, hiển thị các số chia hết cho 5 và 10 ra màn hình, mỗi số cách nhau 1 dòng
2 câu trả lời
Thuật toán :
Bước 1 : nhập dãy số nguyên yêu cầu
Bước 2: chạy dãy số từ a[1]....đến a[n]
Bước 3 : gán a[1]:= min nếu a[i] Bước 4 : In kết quả ra màn hình Bước 5 : kết thúc chương trình ^^
uses crt;
var n,m,i:longint;
begin
clrscr;
write('m,n= ');readln(m,n);
for i:=m to n do
if i mod 10=0 then writeln(i);
readln
end.
