#PHP
#Pascal
Semoga Bermanfaat.
- function faktorial($a){
- if(($a-1) > 0) {
- $b = faktorial($a - 1);
- }
- else {
- $b = 1;
- }
- return $a * $b;
- }
#Pascal
- function faktorial(a : integer) : integer;
- var
- b: integer;
- begin
- if((a-1) > 0) then
- b := faktorial(a - 1)
- else
- b := 1;
- result := a * b;
- end;
Semoga Bermanfaat.
No comments:
Post a Comment