Напечатать таблицу умножения на 5

[leha.podtihov]

Цикл с параметром.
Напечатать таблицу умножения на 5

[newerow1989]

var i:integer;
begin
   For i:=1 to 10 do
      Writeln('5 x ',i,' = ',5*i);
   Readln;
end.