Распечатать в столбик таблицу умножения на 7 (программа Паскаль)

Question

Распечатать в столбик таблицу умножения на 7

Answer 1

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