bwBASIC/BP100/BREAKEVN.BAS

5 CLS
10 PRINT"          BREAK-EVEN ANALYSIS
20 PRINT
30 PRINT"FOR THIS PROGRAM,WE ASSUME THAT A COMPANY HAS CERTAIN
35 PRINT"FIXED COSTS. tHIS COMPANY IS SELLING AN ITEM SUCH THAT
40 PRINT"VARIABLE COST/UNIT SOLD OF THAT ITEM IS KNOWN. wE ALSO
50 PRINT"KNOW THE PRICE AT WHICH THE ITEM IS SOLD. gIVEN THIS
55 PRINT"INFORMATION WE CAN COMPUTE THE NUMBER OF UNITS OF THE
60 PRINT"ITEM WHICH THE COMPANY MUST SELL TO JUST BREAK EVEN,
65 PRINT"I.E. SO THAT THE NET SALE REVENUE JUST COVERS FIXED
70 PRINT"COSTS. WE CAN ALSO COMPUTE THE NUMBER OF ITEMS THE
75 PRINT"COMPANY MUST SELL TO MAKE ANY GIVEN PROFIT. THIS
80 PRINT"PROGRAM  WILL DO BOTH TYPES OF COMPUTATIONS.
90 INPUT"PRESS ENTER TO BEGIN";Z9
100 CLS
110 INPUT"INPUT TOTAL FIXED COSTS IN DOLLARS ";FC
120 INPUT"INPUT UNIT SELLING PRICE IN DOLLARS";SP
130 INPUT"INPUT VARIABLE COST PER UNIT IN DOLLARS ";VC
140 BE=FC/(SP-VC)
150 PRINT:PRINT "BREAK EVEN POINT = ";BE;" UNITS.
160 PRINT
170 PRINT"TO LOOK FOR GIVEN PROFIT POINT INPUT 1
175 PRINT"TO DO ANOTHER BREAK EVEN ANALYSIS INPUT 2
180 INPUT Z8:IF Z8=2 THEN GOTO 100
190 IF Z8=1 THEN GOTO 250
200 PRINT"INPUT ERROR,TRY AGAIN.":FOR I=1 TO 300:NEXT I:GOTO 160
250 PRINT"WHAT PROFIT DO YOU DESIRE";:INPUT P
260 BE=(FC+P)/(SP-VC)
270 PRINT"SALES NEEDED FOR PROFIT ";P;" EQUALS ";BE;" UNITS."
280 INPUT"INPUT 1 FOR ANOTHER BREAKEVEN ANALYSIS";Z9
290 IF Z9=1 THEN GOTO 100