Задача 4 Урок 22
Primary tabs
Дано целое положительное число N, вычислите N! (эн факториал).
var n1:integer; function vivod(N:integer):integer; begin if n>1 then begin result:=n*vivod(n-1); end else result:=n; end; begin n1:=5; write(vivod(n1)); readln(); end.
- Log in to post comments
- 67 reads