Вопрос, который вызвал трудности
Написать процедуру с параметрами, с помощью которой можно нарисовать разворачивающуюся или сворачивающуюся спираль произвольной формы.
Ответ экспертов Учись.Ru
Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.
После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:
Решение:
TO SPP :A :P :Y :K
PD
IF :A < :P
[FD :A RT :Y]
SPP :A + :K :P :Y :K
END
TO SPP :A :P :Y :K
PD
IF :A < :P
[FD :A RT :Y]
SPP :A + :K :P :Y :K
END