Вывести на экран таблицу умножения для числа которое вводится с клавиатуры. надо в форме паскаля.

Beginvar i,a:integer;readln(a);for i:=1 to 10 dobegin   writeln(a + ' * ' + i + ' = ' + a * i);end;end.
результат работы
Ввод
10
Вывод10 * 1 = 1010 * 2 = 2010 * 3 = 3010 * 4 = 4010 * 5 = 5010 * 6 = 6010 * 7 = 7010 * 8 = 8010 * 9 = 9010 * 10 = 100