, в информатике не шарю •надо узнать что получится в результате программы при вводе числа

В условии дана рекурсивная функция.
При выполнении, если число равно единице, то выводится 1, иначе выводится сумма 3 и той же функции с меньшим на единицу значением.

Рекурсивно будет вызвана функция 6 раз и 1 раз в конце, следовательно в конце будет выведено 6*3+1 = 19.

ответ: 19

апельсин - цитрусовое.

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

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

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

паскаль

откомпилирован в: pascal abc

program z1; uses crt; var    s: string;     c: char;     i: integer; begin        write('  vvedite strocy:   ');         readln(s);                 writeln();                 write(' vvedite sivol dl poiska:   ');         readln(c);                 writeln();         for i : = 1 to length(s) do         if s[i] = c then //        begin                  writeln(' simvol prinadlech stroce = ', s);                   break;         end;         if s[i] < > c then writeln(' simvola net v stroke = ', s); end.