Practical#09

SOURCE PROGRAM

10 REM TO PREPARE ELECTRICITY BILL

20 CLS

30 INPUT "ENTER METER NUMBER=:";MN$

40 INPUT "ENTER PREVIOUS READING=:";PR

50 INPUT "ENTER PRESENT READING=:";CR

60 LET U = CR - PR

70 LET A = U * 1.25

80 PRINT TAB(10)  "ELECTRICITY BILL"

90 PRINT"*************************************************************"

100 PRINT "METER NUMBER=:",MN$

110 PRINT "PREVIOUS READING=:",PR

120 PRINT  " PRESENT(Current Reading)READING=:",CR

130 PRINT "UNIT CONSUMED=:",U

140 PRINT "AMOUNT=:", A

150 END



OUTPUT

METER NUMBER=:   AL - 12345
PREVIOUS READING=:   500
PRESENT(Current Reading) READING=:1000
UNIT CONSUMED=:   500
AMOUNT=:    625

Return to Top