Ответ(ы) на вопрос:
ГостьDIM x(20) AS INTEGER
RESTORE
FOR i = 1 TO 20
READ x(i)
NEXT
s = 0
FOR i = 1 TO 20
IF x(i) > 0 THEN
s = s + x(i)
END IF
NEXT
PRINT "s="; s
END
DATA -3,9,-8,6,6,5,0,-7,9,18
DATA 4,-7,9,7,5,-9,-6,6,3,8
Не нашли ответ?
Похожие вопросы