Напишите таблицу умножения на 12 в паскале с и вывести как таблицы.

Var i,b:integer;
begin
for i:=1 to 12 do
begin
writeln('таблица умножения числа',i);
for b:=1 to 12 do
writeln(i*b);
end;
end.
могу только так =)