Информатика, вопрос задал Fuxl , 9 лет назад

Задачу нужно решить на QBASIK


Найти сумму а=2,6,10...
до тех пор пока она не превысит 500

Ответы на вопрос

Ответил v1248
0

CLS

N = 500

k = 4

X = 2

S = 0

DO WHILE S < N

S = S + X

PRINT X, S

X = X + k

LOOP

Новые вопросы