FOR i = 21 TO 99
IF (i MOD 3 = 0) AND (i MOD 10 = 2 OR i MOD 10 = 4 OR i MOD 10 = 8) THEN PRINT i;: s = s + i
NEXT
PRINT
PRINT "s="; s
Тестирование выполнено в программе QB64 ( Скачать )
FOR i = 21 TO 99
IF (i MOD 3 = 0) AND (i MOD 10 = 2 OR i MOD 10 = 4 OR i MOD 10 = 8) THEN PRINT i;: s = s + i
NEXT
PRINT
PRINT "s="; s
Тестирование выполнено в программе QB64 ( Скачать )