Question

составить алгоритм таблицы умножения на 7.

Answer 1

var i: integer;
begin
for i:=1 to 9 do
writeln('7 * ', i, ' = ', 7 * i)
end.