Информатика, 9 класс · Алгоритмы и программирование · § 1.2. Запись вспомогательных алгоритмов на языке Паскаль
procedure F(n: integer);
begin
if n > 0 then
begin
write('*');
F(n - 1);
F(n div 2)
end
end;Нашли ошибку в условии, ответе или решении? Сообщите нам