Инф.9кл.цикл : составить программу вычисления произведение чисел,кратных 5,в интервале от 5 до 18. ответ: 750

DIM p AS LONG
p = 1
FOR i = 5 TO 18 STEP 5
   p = p * i
NEXT i
PRINT p

Проверенный код, выдаёт 750, цикл тут с инструкции 04 по 16, счётчик - Р1, произведение - Р0.

1 П0 5 П1 ИП0 ИП1 * П0 ИП1 5 + П1 1 8 - x>=0 04 ИП0 С/П