Решение задачи Proc 35

#include <stdio.h>
 
float fact2(int n){
    int temp=1;
    for (;n>0;n-=2) temp*=n;
    return temp;
}
 
int main(void)
{
    int i, n;
    for (i=1; i<=5; ++i){
        printf("N:");
        scanf("%i", &n);
        printf("fact: %f\n",fact2(n));
    }
    return 0;
}

import random

def Fact2(N):
    F = 1.0
    while N > 0:
        F *= N
        N -= 2
    return F

for i in range(1,11):
    #x = random.randrange(1,16)
    x = i
    print(x,":",Fact2(x))

									

program Proc35;
 
Function  Fact2(N:Integer):Real;
var
  i:integer;
begin
  result:=1;
  while (N>0) do
   begin
    Result:=Result*n;
    dec(n,2);
   end;
end;
 
var
  N,i:Integer;
 
begin
 for i:=1 to 5 do
  begin
   Write('N :');
   Readln(N);
   Writeln( Fact2(N) );
  end;
end.