LET t0=TIME
LET C=0
FOR m=1 TO 2500
   FOR  n=1 TO 5000
      IF 4*m+2*n=10000 THEN
         LET C=C+1
         PRINT C;":  (";m;",";n;")"
      END IF
   NEXT n
NEXT m
PRINT
PRINT "ŒvŽZŽžŠÔ=";TIME-t0
END