Rosetta Code

Guess the number/With feedback: Difference between revisions

Page Discussion

Guess the number/With feedback (view source)

Revision as of 00:48, 7 July 2023

70 bytes removed ,  10 months ago
m
→‎{{header|Minimal BASIC}}: Removed obscuring REMs. Corrected jump for G >= 1.
m (→‎{{header|Minimal BASIC}}: Removed obscuring REMs. Corrected jump for G >= 1.)
Line 462:
110 LET T = 0
120 LET N = 20
130 LET R = INT(RND *N)+1
140 PRINT "GUESS A WHOLE NUMBER BETWEEN 1 AND";N
150 REMLET LOOPT = T+1
160 LETPRINT T"ENTER =YOUR T+1NUMBER ";
170 INPUT G
170 PRINT "ENTER YOUR NUMBER ";▼
180 INPUTIF G <> R THEN 210
200190 PRINT "YOU GUESSED IT IN";T;"TRIES."▼
190 IF G <> R THEN 220
200 GOTO 310
▲200 PRINT "YOU GUESSED IT IN";T;"TRIES."
210 GOTOIF 360G > R THEN 240
220 REMIF ENDIFG < 1 THEN 240
230 IFPRINT G"SORRY, >YOUR RNUMBER THENWAS 260TOO LOW"
240 IF G < 1R THEN 260270
250 PRINTIF "SORRY,G YOUR> NUMBER100 WASTHEN TOO LOW"270
▲170260 PRINT "ENTERSORRY, YOUR NUMBER WAS TOO HIGH";
260 REM ENDIF
270 IF G <>= R1 THEN 300
280 IF G ><= 100 THEN 300
290 PRINT "SORRY,THAT YOURWAS NUMBERAN WASINVALID TOO HIGHNUMBER"
300 REMIF ENDIFG <> R THEN 140
360310 END</syntaxhighlight>▼
310 IF G >= 1 THEN 320
320 IF G <= 100 THEN 340
330 PRINT "THAT WAS AN INVALID NUMBER"
340 REM ENDIF
350 IF G <> R THEN 150
▲360 END</syntaxhighlight>
 
==={{header|QB64}}===
Christophoro S
511

edits

Retrieved from "https://rosettacode.org/wiki/Special:MobileDiff/345979"