Умоляю с информатикой, Решите задачу двумя используя цикл ПОКА и
цикл ДО
Необходимо вывести на экран 5 раз сообщение
“Здравствуйте! Я робот”.

1. цикл ПОКА

program z1;

var i:integer;

begin

i:=1;

while i<6 do

begin

writeln ('Здравствуйте! Я робот');

i:=i+1

end

end.

2. цикл ДО

program z2;

var i:integer;

begin

i:=1;

repeat

writeln ('Здравствуйте! Я робот');

i:=i+1

until i=6

end.