zadach127.BAS

{* Задача127 *}

REM basic

' Подсчитать факториал дня


cls
P=1 
        Input « введите число»”;N
        For x=1 To N
P=P*x
        Next x       
        PRINT  «факториал=» P
End