profile
Опубликовано 6 лет назад по предмету Информатика от eXxXtaZzZyez

procedure F(n: integer);
begin
if n < 6 then
begin
write(n);
F(n * 2);
F(n + 2)
end;
if n < 5 then
begin
write(n + 1);
F(n + 2)
end
end;

В паскале пишет (встречен конец файла а ожидалось begin) Как пофиксить ?

  1. Ответ
    Ответ дан roman1020
    Указали только процедуру. "begin" и "end." обязательно должны быть в коде.

    Нужно обязательно ввести функцию F в код. Эникей был прав в том, что там точка с запятой не нужна.
    1. Ответ
      Ответ дан Аккаунт удален
      перед end точка с запятой факультативна, это Вам не С/С++
  2. Ответ
    Ответ дан Аккаунт удален

    // PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

    // Внимание! Если программа не работает, обновите версию!

    procedure F(n: integer);

    begin

     if n < 6 then

     begin

       write(n);

       F(n * 2);

       F(n + 2)

     end;

     if n < 5 then

     begin

       write(n + 1);

       F(n + 2)

     end

    end;


    begin

     var n := ReadInteger;

     F(n)

    end.

    1. Ответ
      Ответ дан Аккаунт удален
      Ответ дан чисто "из принципа", чтобы некоторые "упертые дети" убедились, что никаких "точек с запятыми" вносить в код не нужно.
Самые новые вопросы