Home
JAQForum Ver 24.01
Log In or Join  
Active Topics
Local Time 10:41 25 Nov 2024 Privacy Policy
Jump to

Notice. New forum software under development. It's going to miss a few functions and look a bit ugly for a while, but I'm working on it full time now as the old forum was too unstable. Couple days, all good. If you notice any issues, please contact me.

Forum Index : Microcontroller and PC projects : BASIC Divide prog for Kids

Author Message
YT2095

Newbie

Joined: 07/02/2012
Location: United Kingdom
Posts: 22
Posted: 01:36pm 12 Feb 2012
Copy link to clipboard 
Print this post

here`s just a simple prog I wrote this morning for my daughter to help her with her Division practice, it`s aimed at 6 year olds really, but you could easily alter it for larger numbers.

10 CLS
20 RANDOMIZE TIMER
30 A=INT(RND(1)*91)+10
40 B=INT(RND(1)*10)+1
50 c = a/b
60 m =a MOD b
70 PRINT A " /" B " =";
80 INPUT D
90 IF INT(C)=D GOTO 110
100 IF INT(c)<> D GOTO 260
110 PRINT "remainder= ";
120 INPUT r
130 IF r<> m GOTO 260
140 IF r = m GOTO 160
150 end
160 REM well done
170 PRINT " "
180 PRINT "Well Done!"
190 FOR i = 20 TO 200 STEP 10
200 FOR q=20 TO 2000 STEP i
210 SOUND q,10,50
220 PAUSE 10
230 NEXT q
240 NEXT i
250 GOTO 10
260 REM Wrong
270 PRINT "Wrong, Try again."
280 PRINT " "
290 FOR q=2000 TO 20 STEP -40
300 SOUND q,10,50
310 PAUSE 10
320 NEXT q
330 GOTO 70

I`m sure someone else here may find a use for it too.

All the best! :)
Edited by YT2095 2012-02-13
 
Print this page


To reply to this topic, you need to log in.

© JAQ Software 2024