%Problem Statement: Write a breakeven analysis program for the zoos enclosure so they can compare %the possible options. %The program should use a menu listing three material options: Concrete, Wood, or Adobe, pulled from the %cell array. You may NOT hardcode or use an if statement/switch statement to retrieve these names. This menu %should automatically change should the cell array be altered as to the number and types of materials. % The program should set the total surface area of the wall to be 3000 square feet. The program should then % calculate the total cost of construction considering all costs above, in appropriate units. You should use %this total as your fixed cost.

%Housekeeping: clear clc close all %Assign the variables: %CM= Construction Materials %SA= Surface Area of the Wall [square feet] %TH=Thickness [feet] %FC=Total Material Cost [$] %TC=Total Cost [$] %TLBC=Total Labor Cost [$/week] %EC=Energy Cost [$/week] %MC=Maintenance Cost [$/week] %LFC=Landfill Cost [$/week] %W = Number of Weeks [weeks] %A= Price of Admission per person [$/person] %P= Number of people per week that visit the zoo [people/week] %ED= Expected donations per week [$/week] %TFC= Total Fixed Cost [$] %WVC= Total Variable Cost per week [$/week] %OpenT= Open number of years [years] %TCY= total cost of enclosure for number of years requested [$] %T = Time the enclosure is open [years] %TRV = Total Revenue [$] %TP= Total Profit [$] %BET = Break Even Point %DA = Donation Amount [$] % TC7 = Total cost for 7 monthes % TRV7 = Total revenue for seven monthes % TC7 = Total cost for seven monthes % BE7 = the donation amount it would take to breakeven at the end of seven months

%Create the Cell Array: CM=({'Concrete' 16 30 96000 900 5 5 'Wood' 23 53 115000 800 12 11 'Adobe' 18 42 68000 600 6 5}); %Create the menu to let user choose the material: choice = {'Concrete','Wood','Adobe'}; material=menu('Select material',choice); SelectedMaterial=choice{material}; %Set the known Surface Area Value and Variable: SA = 3000; %Convert the thickness of wall from inches to feet: TH = CM{material,2}/12; %Calculate the material cost: FC=CM{material,3}*SA*TH; %Multiply the thickness and material cost with the surface area %Calculate the Total Labor Cost using labor cost [$/per person], number of laborers [people] and number of weeks: TLBC =CM{material,5}*CM{material,6}*CM{material,7}; %Calculate the Total Fixed Cost using fixed cost [$] plus construction material: TFC=(FC+TLBC+CM{material,4}); %User must Input this inforomation:

EC=input(' Enter the energy cost [$/week]:');%input of energy cost LBC=input('Enter the labor cost [$/week]:'); % input of labor cost MC=input('Enter the Maintenance cost [$/week]:'); %input of the the Maintenance cost LFC=input('Enter the Landfill cost [$/week]:'); % input of Landfill cost W=input('Enter the number of weeks per year the zoo will operate:');% input of the number of weeks per year the zoo will operate: Y=input('Enter the number of years the analysis should include:');% input of the number of years the analysis should include A= input('Enter the price of admission per person [$/person]:');% input of the price of admission per person P= input('Enter the number of people that will visit the zoo per week:');% input of the number of people that will visit the zoo per week ED= input('Expected donations per week:'); %Calculate the total variable cost of operating the enclosure per week: WVC=LBC+MC+LFC+EC; %Calculate the total cost to operate the selected material for the open %number of years by the user: TCY=WVC*W; %Determine the total revenue for the number of years requested, where each %column is a year (Include the donations): TRV=((A*P)+ED)*W; %Determine the total profit for the number of years requested by the user: TP=(((TRV-TCY)*Y)-TFC); %Profit=Revenue(how much made)-Cost(how much money you put in) %Calculate the breakeven point in months: BET=(TFC/(TRV-TCY))*12; %BreakevenTime=FixedCost/(Yearly Revenue - Yearly Total Variable Cost)*(12/52) %Calculate the donation amount it would take to breakeven at the end of %seven months DA(Donation amount): % TC7 = calculate total cost to operate the selected material for seven months (28 weeks) OTD=(7*(52/12)); TC7= WVC*OTD;%weeks % Dtetermin the Total revenue for seven monthes TRV7=((A*P)+ED)*OTD; %(TRV7 = total revenue seven monthes) BE7= ((TFC+TC7)-TRV7); %(BE7= Breakeven at the end of seven months) %Display these statements into the command window: fprintf(' ------------------------- '); fprintf('Material: %s ', CM{material,1}); fprintf('\tOperating %0.0f weeks per year will generate per year: ',W); fprintf('\t\tRevenue:\t$%0.2f ',TRV) fprintf('\t\tCost:\t$%0.2f ', TCY) fprintf('\tThe breakeven time is %0.2f months: ', BET); fprintf('\tThe total profit after %0.0f years is:\t$%0.3e. ', Y,TP); %Display statement: fprintf('It will take a one-time donation of $%0.2f to breakeven in seven months: ',BE7); fprintf(' ------------------------- ');

%Create Proper Plot for number of years of the revenue and total cost:

figure ('color','w'); plot(Y,TRV,'-b',Y,TCY,'-r'); hold on BEP=(TRV(1,2)*BET); plot (BET,BEP,'r*','MarkerSize',10,'MarkerFaceColor','k'); grid on title('Revenue and Total cost per year'); xlabel('Number of Years (Y)[Y]'); ylabel('Revenue and Total Cost (R),(C)[$]'); LT = {'Revenue Cost', 'Total Cost'}; L = legend(LT,'Location','Best');

%Create Proper Plot for the total profit of the construction choice with %repect to time in years figure ('color','w'); plot (Y,TP,'-m','LineWIdth',0.5); hold on plot(BET,'o c','MarkerSize',10,'MarkerFaceColor','c'); grid on title('Profit'); xlabel('Number of Years (Y)[Y]'); ylabel('Total Profit of Construction Choice (P)[$]');