Дан рекурсивный алгоритм: procedure f(n: integer); begin writeln( * ); if n 0 then begin writeln( * - id745836320211027 от volechka1 27.10.2021 03:42

Question

Информатика: Дан рекурсивный алгоритм: procedure f(n: integer); begin writeln( * ); if n 0 then begin writeln( * ); f(n-2); f(n-2); f(n div 2); end end; сколько символов звездочка будет напечатано на экране при выполнении вызова f(6)?

volechka1 · Accepted Answer

ответ 1:Program zadacha; var i,n:integer; begin  writeln ( Введите число: ); readln(n); for i:=1 to n do  write(n-i+1); end.ответ 2:Program zadacha; var i,a,b:integer; begin  writeln ( Введите A: ); readln(a);  writeln ( Введите B: ); readln(b); for i:=a to b do   if (i mod 2 0) then writeln(i); end.ответ 3:Program zadacha; var i,a,b,sum:integer; begin  writeln ( Введите A: ); readln(a);  writeln ( Введите B: ); readln(b); for i:=a to b do   if (i mod 10 = 7) then begin sum:=sum+i; end;     writeln(...

MOGZ ответил