To print the sum of the numbers from 1 to 50 which are divisible by 5 and 7. (Qbasic Code)

To print the sum of the numbers from 1 to 50 which are divisible by 5 and 7.

• CLS
  s = 0
  FOR i = 1 TO 50
      a = i MOD 5
      b = i MOD 7
      IF a AND b = 0 THEN
          s = s + i
      END IF
  NEXT i
  PRINT "The sum of the numbers is "; s
  END

Share :

Twitter