Что выведет данная программа? program p1;var Z:integer;function f (n:byte):longint;beginif n=0 then f:=1else f:=(2n)f(n-1); end;beginz:=f(5); writeln (z);end.

Question

Что выведет данная программа? program p1;var Z:integer;function f (n:byte):longint;beginif n=0 then f:=1else f:=(2n)f(n-1); end;beginz:=f(5); writeln (z);end.

Что выведет данная программа? program p1; var Z:integer; function f (n:byte):longint; begin if n=0 then f:=1 else f:=(2*n)*f(n-1); end; begin z:=f(5); writeln (z);end.

Гость

Ответ(ы) на вопрос:

Accepted Answer

Выдаст произведение следующих чисел 2*5*2*4*2*3*2*2*2*1=3840

Что выведет данная программа? program p1;var Z:integer;function f (n:byte):longint;beginif n=0 then f:=1else f:=(2*n)*f(n-1); end;beginz:=f(5); writeln (z);end.

Что выведет данная программа? program p1;var Z:integer;function f (n:byte):longint;beginif n=0 then f:=1else f:=(2n)f(n-1); end;beginz:=f(5); writeln (z);end.