Составить алгоритм таблицы умножения на 7.
Var i: integer; begin for i:=1 to 9 do writeln('7 * ', i, ' = ', 7 * i) end.