Procedure F(n: integer); begin if n < 6 then begin write(n); F(n * 2); F(n + 2) end; if n...
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) Как пофиксить ?
Оператор program в Паскале обязательным не является. Более того, он ничего не делает.
Procedure F(n: integer);begin if n < 6 then begin write(n); F(n * 2); F(n + 2) end; if n

11 Июл 2019 в 06:13
335 +1
0
Ответы
1

Да, извините за путаницу. Процедура должна вызываться в основной программе для выполнения. Добавьте в конце кода следующие строки:

begin
F(1);
end.

Это вызовет процедуру F с параметром 1 и запустит выполнение кода. Извините за недоразумение.

20 Апр 2024 в 23:26
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки в течение 1 года
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Поможем написать учебную работу
Прямой эфир