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

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

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

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
     writeln(i);      //строка для проверки, чтоб видеть номер витка
     if(i=4)then
       writeln(777)
     else if(i=5) then
       break;
  end;

  readln();
end.