Для вычисления произведения всех натуральных чисел от 1 до n в Бейсике можно использовать следующий код:
DIM result result = 1 INPUT "Введите число n: ", n FOR i = 1 TO n result = result * i NEXT i PRINT "Произведение всех натуральных чисел от 1 до "; n; " равно "; result
Пользователю будет предложено ввести число n, а затем программа вычислит произведение всех натуральных чисел от 1 до n и выведет результат на экран.
Для вычисления произведения всех натуральных чисел от 1 до n в Бейсике можно использовать следующий код:
DIM resultresult = 1
INPUT "Введите число n: ", n
FOR i = 1 TO n
result = result * i
NEXT i
PRINT "Произведение всех натуральных чисел от 1 до "; n; " равно "; result
Пользователю будет предложено ввести число n, а затем программа вычислит произведение всех натуральных чисел от 1 до n и выведет результат на экран.