Дан массив из 12 элементов, найти сумму элементов массива лежащих в интервале 3<=D(i)<13 - QBasic(Бейсик)

DIM a(12)
FOR i = 1 TO 12
    INPUT a(i)
NEXT
FOR i = 1 TO 12
    IF a(i) >= 3 AND a(i) < 13 THEN s = s + a(i)
NEXT
PRINT s

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

Leave a Comment