viết chương trình in ra màn hình bảng nhân 8 cần gấp vote 5sao

2 câu trả lời

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.

 var i, j: integer;

begin

write ('bang cuu chuong')

for i :=1 to 10 do if j:=8 then write ( j:2, 'x', i:2, '=', i*j:2)

Readln

end