viết phương trình in ra màn hình bảng nhân của 1 số từ 1 đến 9 dùng câu lệnh while do và dừng màn hình để có thể quan sát kết quả
2 câu trả lời
program oken;
uses crt;
var i,n:longint;
begin
clrscr;
write('Nhap 1 so bat ky: '); readln(n);
writeln(' BANG CUU CHUONG ',n);
i:=1;
while i<=9 do
begin
writeln(' ',n,' * ',i,' = ',n*i);
i:=i+1;
end;
readln;
end.
program Bai_tap_1;
uses crt;
var i,n:longint;
begin
clrscr;
write('Nhap n: '); readln(n);
writeln(' BANG CUU CHUONG ',n);
i:=1;
while i<=9 do begin
writeln(' ',n,' * ',i,' = ',n*i);
i:=i+1;
end;
readln;
end.
Câu hỏi trong lớp
Xem thêm