Вывести в виду столбцов и строк таблицу умножения В ПАСКАЛЕ!!!

Question

Вывести в виду столбцов и строк таблицу умножения В ПАСКАЛЕ!!!

Answer 1

Var i,k:integer;
begin
for i:=1 to 9 do
begin
for k:=1 to 9 do
write(i*k:4);
writeln;
end;
end.