vt ct in ra bảng cửu chương bằng ngôn ngữ lập trình pascal

2 câu trả lời

program in_bang_cuu_chuong;

uses crt;

var n,i: integer;

begin

clrscr;

write('nhap n:'); readln(n);

for i:=1 to 9 do writeln(n,'x',i,'=',n*i);

readln

end.

program sksk;

uses crt;

var i, n : integer;

begin

clrscr;

write('nhap so bang cuu chuong :');readln(n);

for i := 1 to 10 do

writeln(n,' x ', i ,' = ', i*n);

readln

end.