Pascal Решите
procedure F(n: integer);
begin
write(n);
if n >= 3 then
begin
F(n div 2);
F(n - 1)
end
end;
Запишите подряд без пробелов и разделителей все числа, которые будут
выведены на экран при выполнении вызоваF(5). Числа должны быть
записаны в том же порядке, в котором они выводятся на экран