Задача 1 Урок 10.2

http://fkn.ktu10.com/?q=node/8783

Модицифируйте код:

var i:integer;
begin
  for i:=1 to 10 do
  begin
     writeln(777);
     break;
  end;
 
  readln();
end.

-- таким образом, чтобы на 4-ом витке на экран было выведено число 777, а на 5-ом произошел выход из цикла (при этом строчку for i:=1 to 10 оставьте без изменений).

var i:integer;
begin
  for i:=1 to 10 do
     begin
     if(i = 4) then
       writeln('777');
     if(i = 5) then
       begin
       writeln('break');
       break;
       end;
     end;
  readln();
end.