CLS
DIM N AS LONG
J = 10
RANDOMIZE TIMER
FOR I = 1 TO 10
  A = INT(90 * RND + 10)
  B = INT(90 * RND + 10)
  C = INT(5 * RND)
  SELECT CASE C
    CASE 1
      PRINT A; "+"; B; "=";
      INPUT N
      IF A + B = N THEN FS = FS + J: PRINT "Yes!" ELSE PRINT "No!"; "da`an:"; A + B
    CASE 2
      PRINT A; "-"; B; "=";
      INPUT N
      IF A - B = N THEN FS = FS + J: PRINT "Yes!" ELSE PRINT "No!"; "da`an:"; A - B
    CASE 3
      PRINT A; "*"; B; "=";
      INPUT N
      IF A * B = N THEN FS = FS + J: PRINT "Yes!" ELSE PRINT "No!"; "da`an:"; A * B
    CASE 4
      PRINT A; "\"; B; "=";
      INPUT N
      IF A \ B = N THEN FS = FS + J: PRINT "Yes!" ELSE PRINT "No!"; "da`an:"; A \ B
    CASE 5
      PRINT A; "MOD"; B; "=";
      INPUT N
      IF A MOD B = N THEN FS = FS + 1: PRINT "Yes!" ELSE PRINT "No!"; "da`an:"; A MOD B
   END SELECT
NEXT I
PRINT "ni de fen shu shi:"; FS
END