Вывести на экран таблицу умножения на N ,которое запрашивается с клавиатуры

program zz1;
var n,i,j:integer; // задаем переменные
begin
write(введите n ); // вводим заданное число
read(n);
write(введите до какого числа выводим таблицу ); // вводим ограничение для выводимой таблицы
read(j);
for i:=0 to j do // организуем перебор чисел от 0 до введенного числа
writeln(i, * ,n, = ,i*n); // выводим ответ в столбец

end.