Создать процедуру, которая выводит на экран текстовую строку «Турбо Паскаль». Используя созданную процедуру, вывести на экран данную строку 5 раз. Желательно всей программой.

Ответы

Ответ дал: vladmor
0
var i:integer;

procedure print;
begin
  writeln('Турбо Паскаль');
end;

begin
for i:=1 to 5 do
  print;
end.

Похожие вопросы