Найти произведение всех целых чисел от 8 до 15 Написать программу в Q-Basic

Question

Найти произведение всех целых чисел от 8 до 15 Написать программу в Q-Basic

Answer 1

P = 1
FOR I = 8 TO 15
    P = P * I
NEXT I
PRINT "P="; P