0 голосов
1 просмотр

Написать программу: Вычислить сумму кубов всех 3-х значных нечетных чисел. QBASIC.

спросил от (46 баллов) в категории Информатика

1 Ответ

0 голосов
ответил от БОГ (150k баллов)
 
Лучший ответ

DIM i AS LONG, s AS DOUBLE
s = 0
FOR i = 101 TO 999 STEP 2
   s = s + i ^ 3
NEXT i
CLS
PRINT "S="; s

Результат: S= 124987252500

...