рекурсивная функция F. Begin
Write (n div 3);
If n div 3 > 2 then
Begin
F(n-3);
F(n-5);
End;
End.
Что выведет программа при вызове F(14)? В ответе запишите последовательность выведенных цифр слитно (без пробелов).

4322321

Объяснение:

Функция перестанет вызывать саму себя, когда выражение n div 3 > 2 будет ложным, то есть при n ≤ 8. При рекурсии функции вызываются последовательно: как только видим первую функцию, пишем новую строку, расписывая результат вызова, и вновь делаем то же самое. Однако для экономии места и времени можно раскрывать функции в строке сразу, ведь от этого порядок вывода чисел не изменится.

F(14) = 4F(11)F(9) = 43F(8)F(6)3F(6)F(4)=4322321

1.

var n: integer; begin  cls;   for n: =1 to 10 do begin    write('n=',sqr(n)+5,' ');   end; end.

решить на паскале?

program xxx;   var a, b, min : integer; begin  write('введите число а=');  

    readln(a);

  min: =10;   while a < > 0 do      begin            b: = a mod 10;             if b < min then min: =b;             a: = a div 10      end;     writeln('минимальная цифра = ', min);   readlnend.