uses crt; var N,i:integer; begin write(‘nhap so N’); readln(N); writeln (‘ bang nhan ‘, N); begin for i:=1 to 10 do writeln(N,’x’,1:2,’= ‘, N*1;3); end; readln; end. Bình luận
program bt; var N,i:integer; begin write(‘nhap so N’); readln(N); writeln; writeln (‘ bang nhan ‘, N); writeln; for i:=1 to 10 do writeln(N,’x’,1:2,’= ‘, N*1;3); end readln end. Bạn xem lại nha, mik sợ mik làm thiếu á (◕‿◕✿) Bình luận
uses crt;
var N,i:integer;
begin
write(‘nhap so N’); readln(N);
writeln (‘ bang nhan ‘, N);
begin
for i:=1 to 10 do
writeln(N,’x’,1:2,’= ‘, N*1;3);
end;
readln;
end.
program bt;
var N,i:integer;
begin
write(‘nhap so N’); readln(N);
writeln;
writeln (‘ bang nhan ‘, N);
writeln;
for i:=1 to 10 do writeln(N,’x’,1:2,’= ‘, N*1;3); end
readln
end.
Bạn xem lại nha, mik sợ mik làm thiếu á (◕‿◕✿)