{* Задача162 *}

REM basic

' Найти произведение членов последовательности на примере факториала
' i!=1*2*3*4*…*(i-1)*i


CLS
INPUT "Введите n"; n
P=1
For i=1 To n
P=P*i
Next i
PRINT "P="; Р
End