Gw-Basic Program # 3 "You Are A Railway Manager...!"

10 CLS
20 INPUT "CURRENT STATION:" , S
30 INPUT "DESTINATION:" , D
40 INPUT "PASSANGERS:" , P  
50 INPUT "TOTAL AMOUNT GIVEN:" , G
60 IF P>2 THEN GOTO 130 ELSE GOTO 70
70 LET F=20 * P : LET C= G - F
80 PRINT "CURRENT STATION:" S
90 PRINT "DESTINATION:" D
100 PRINT "PASSANGERS:" P
110 PRINT "TOTAL FARE:" F
120 PRINT "CHANGE:" C : END
130 LET TF= 20 * P : LET DF= TF * 0.9 : LET CF = G - DF
140 PRINT "CURRENT STATION:" S
150 PRINT "DESTINATION:" D
160 PRINT "PASSANGERS:" P
170 PRINT "TOTAL FARE (WITH DISCOUNT):" DF
180 PRINT "CHANGE:" CF
190 END

Program Made By:- Muhammed Abbas