Вопрос Помогите отредактировать программу на Паскале
- Автор темы fantasiz
- Дата начала
с комментариев поорал. В программе одно лишнее присваивание было, я его исправил procedure F(n: integer); begin if n < 8 then begin F(n+3); write
; F(2*n) end; end; begin F(4); end.
; F(2*n) end; end; begin F(4); end.
в конце end.
Так это не программа, а процедура, к тому же бессмысленная.
А? я так понял это рекурсия. но внимание вопрос, а когда она закончиться то должна? каждый раз каждая рекурсия приравнивает n к 1 и больше 7, чтобы выйти из нее, она стать не может. а еще перед begin точка с запятой не ставится
последний оператор заканчивается точкой end.