Предмет: Информатика,
автор: 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) Как пофиксить ?
Аноним:
Оператор program в Паскале обязательным не является. Более того, он ничего не делает.
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
end.
Ответы
Автор ответа:
1
Указали только процедуру. "begin" и "end." обязательно должны быть в коде.
Нужно обязательно ввести функцию F в код. Эникей был прав в том, что там точка с запятой не нужна.
Нужно обязательно ввести функцию F в код. Эникей был прав в том, что там точка с запятой не нужна.
Автор ответа:
0
// 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.
Приложения:
Похожие вопросы
Предмет: Биология,
автор: sadykovaz829
Предмет: История,
автор: eduardaivanova35
Предмет: Русский язык,
автор: kudaibergenovaalin
Предмет: Алгебра,
автор: Вован551
Предмет: Математика,
автор: Akos102