Viết chương trình cho phép nhập vào 2 số nguyên dương N và K. Sau đó ghi ra màn hình đánh sách các số nguyên nhỏ hơn N và chia hết cho K
2 câu trả lời
uses crt;
var i,n,k:longint;
begin
clrscr;
write('Nhap N,K: ');readln(n,k);
for i:=1 to n-1 do
if i mod k=0 then write(i,' ');
readln
end.
uses crt;
var n,k,i:longint;
begin
clrscr;
write('Nhap n=');readln(n);
write('Nhap k=');readln(k);
for i:=1 to n-1 do
if i mod k=0 then write(i,' ');
readln;
end.
Câu hỏi trong lớp
Xem thêm