Вычислить а) S=5! / x. — QBasic(Бейсик) — Справочник разработчика ИС

REM program
CLS
factorial = 1
 
INPUT "Enter x: ", x
 
FOR i = 1 TO 5
    factorial = factorial * i
NEXT i
 
PRINT "Result: ", factorial / x
 
END

Тестирование выполнено в программе QB64 ( Скачать )

Вычислить а) S=5! / x. — QBasic(Бейсик)