Написать программу, которая напишет 5 раз слово "Привет" нужно использовать For.. to......

Question

Написать программу, которая напишет 5 раз слово "Привет" нужно использовать For.. to... и do.. что-то по типу такого: Program sum; Var i,n,s:integer; Begin Writeln(‘ Введите n’); Read(n); S:=0; i:=1; While i<=n do Begin s:=s+i; i:=i+1; End; Writeln(‘ Сумма чисел= ’, S); End.

Answer 1

Ответ:

Объяснение:

program pr;

begin

  writeln('Ïðèâåò!');

  writeln('Ïðèâåò!');

  writeln('Ïðèâåò!');

  writeln('Ïðèâåò!');

  writeln('Ïðèâåò!');

end.