Question

Составьте программу вычесления суммы всех трехзначных натуральных чисел, кратных 3 и 7. Пожалуйста помогите срочно((

Answer 1

Пишу на QBasic
CLS
FOR I = 100 TO 999 
IF I MOD 3=0 OR I MOD 7=0 THEN
C=C+I
END IF
NEXT I
PRINT C