Program n1; var n: integer; function fact(x: integer ):real; begin if x=0 then fact:=1 else fact:=fact(x-1)*x; end; begin readln(n); write(fact(n+1)); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
