Ниже записан рекурсивный алгоритм f. чему равна сумма напечатанных на экране чисел при выполнении вызова f(10)? procedure f (n: integer); begin if n > 2 then begin writeln (n); f (n-3); f (n-4) end end;

Для удобства прономерую строки: 1) procedure f (n: integer); 2) begin3) if n > 2 then begin  4) writeln (n); 5) f (n-3); 6) f (n-4)7) end8) end; -первый вызов- со входным параметром n=10-в строке 3 проверяется, что n больше двух,-так как n действительно больше двух, то  выполняются три следующие строки № 4,5,6 (а строка 7 -это указатель  конца блока, выполняемого при истинности проверки)-строка 4 печатает значение n, то есть 10-строка 5 вызывает этот алгоритм вновь, со входным параметром 7-строка 6 опять вызывает алгоритм, со входным параметром 6и в каждом вызове будут ещё два вызова, со входными параметрами на три и четыре меньше, чем были так далее, каждый вызов будет вновь вызывать алгоритм, и печатать n до тех пор, пока n будет больше двух.итак, получим ветвление вызовов, и вот значение n в каждом из них:     10      7                    6  4      3            3      21 0  0 -1          0 -1но, не все из этих n будут напечатаны, а только те, которые больше двух. если по порядку, то вот что будет напечатано: 1074363сумма всех этих чисел равна 33ответ: 33.

. в древней индии писали на камне и листьях пальмы. листья пальмы высушивали и нарезали длинными, узкими пластинами. надпись наносили тушью. если для записи использовалось более одного листа, то все написанные листы соединяли бечевкой, концы которой прикреплялись к хорошо обструганным деревянным дощечкам. пальмовые листы находились между двумя дощечками, как книга в переплете. иногда поверхность дощечек покрывали тонкими серебряными пластинами с узорной резьбой

 

источник информации иайл.ру

1.

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

 

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