Посчитать сумму нечётных чисел от 15 до 30- QBasic(Бейсик)

FOR i = 15 TO 30 STEP 2
    s = s + i
NEXT
PRINT s

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

Leave a Comment