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

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