zadach279.BAS

{* Задача279 *}

REM basic

' Нахождение двойного факториала


PRINT "n!!"
INPUT "n"; n
fkt = 1
If n Mod 2 = 0 Then x = 2 Else x = 1
For i = x To n Step 2
    fkt = fkt * i
Next
PRINT fkt
End