Question

Составьте программу выводящую на экран фрагмент таблицы умножения:
1x2=2
2x3=6
3x4=12
...
9x10=90

Answer 1

var
    i: integer;

begin
    for i := 1 to 9 do
        writeln(i, 'x', i + 1, '=', i * (i + 1));
end.