Урок №10.2 Задание 1

Урок №10.2 Задание 1

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

program Pr10_2_1;

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

  readln();
end.

Консоль:

777
777
777
777