Что выведет данная программа?
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.
Выдаст произведение следующих чисел
2*5*2*4*2*3*2*2*2*1=3840
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
