Ниже записан рекурсивный алгоритм 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.

var n,a,b,c,d,s: integer;

begin

  write('n='); readln(n); {n -   даанное 4-хзначное число}

  a: =n mod 10; {последняя, 4-я, цифра числа}

  b: =(n div 10) mod 10; {предпоследняя, 3-я, цифра}

  c: =(n div 100) mod 10; {2-я цифра}

  d: =n div 1000; {1-я цифра}

  s: =a+b+c+d;

    writeln('s=',s);

end.

в условии не указано но для кодирования используется фраза "в памяти " при этом для нахождения кода шифрованной буквы нужно к коду исходной буквы прибавить код буквы из предложения к первой букве прибавляем код первой буквы предложения ко второй код второй итд т.

а для расшифровки эти коды нужно вычитать, получаем

 

в   п   а   м   я

3   17   1 14 33

п   щ     о     я     к

17 27   16   33   17

-

3   17   1     14   33

14 10 15   19     17

м   и   н     с       к

 

н     щ     ё   п

15   27   7     17

-

3     17   1     14 

12   10   26   3

к     и     е     в