Урок 21 Задача 4

Primary tabs

Submitted by Patrick on Sat, 01/14/2023 - 19:41

Forums:

Урок 21 Задача 4:

Дано целое положительное число N, вычислите N! (эн факториал).

function fakt(n: integer):integer;
begin
  if (n = 1) then
    result := 1
  else
    result := n * fakt(n-1);
end;

begin
  writeln(fakt(6));
  readln();
end.
  • Log in to post comments
  • 667 reads
vedro-compota's picture

vedro-compota

Sun, 01/15/2023 - 13:09

засчитано

_____________
матфак вгу и остальная классика =)