Да, конечно! Вот код на QBasic для нахождения суммы 15 чисел:
DIM numbers(15) AS INTEGER DIM sum AS INTEGER FOR i = 1 TO 15 PRINT "Введите число "; i; ": "; INPUT numbers(i) sum = sum + numbers(i) NEXT i PRINT "Сумма чисел равна: "; sum
Просто запустите этот код в среде QBasic и вводите числа по очереди. На экран будет выведена сумма введенных чисел.
Да, конечно! Вот код на QBasic для нахождения суммы 15 чисел:
DIM numbers(15) AS INTEGERDIM sum AS INTEGER
FOR i = 1 TO 15
PRINT "Введите число "; i; ": ";
INPUT numbers(i)
sum = sum + numbers(i)
NEXT i
PRINT "Сумма чисел равна: "; sum
Просто запустите этот код в среде QBasic и вводите числа по очереди. На экран будет выведена сумма введенных чисел.