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

Question

4 года назад

12

Что выведет данная программа?

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.

1 ответ:

ЛинаЛинаР · Answer 1 · 2020-03-12T08:09:15+03:00

ЛинаЛинаР4 года назад

0 0

Выдаст произведение следующих чисел

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