задание 4 Урок 21
Primary tabs
Дано целое положительное число N, вычислите N! (эн факториал).
program U21z4;
function fact(n:integer):integer;
begin
if n = 1 then
fact:= 1
else
fact:= n*fact(n-1);
end;
begin
writeln(fact(6));
readln;
end.
- Log in to post comments
- 857 reads
vedro-compota
Wed, 02/09/2022 - 20:37
Permalink
засчитано
засчитано
_____________
матфак вгу и остальная классика =)