From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 1208/CH9/EX9.17/Exa17.sce | 54 +++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 54 insertions(+) create mode 100755 1208/CH9/EX9.17/Exa17.sce (limited to '1208/CH9/EX9.17') diff --git a/1208/CH9/EX9.17/Exa17.sce b/1208/CH9/EX9.17/Exa17.sce new file mode 100755 index 000000000..63b97695e --- /dev/null +++ b/1208/CH9/EX9.17/Exa17.sce @@ -0,0 +1,54 @@ +//Exa 17 +clc; +clear; +close; +// given data : +STs=1600;//in hours +STu=2400;//in hours +ATs=2500;//in hours +ATu=2500;//in hours +SRs=0.50;//in Rs/Hour +SRu=0.60;//in Rs/Hour +ARs=0.40;//in Rs/Hour +ARu=0.50;//in Rs/Hour +//Labour Cost variance +LCVs=(STs*SRs)-(ATs*ARs) +LCVu=(STu*SRu)-(ATu*ARu) +//Labour Efficiency variance +LEVs=SRs*(STs-ATs);// in Rs +LEVu=SRu*(STu-ATu);// in Rs +//Labour Rate variance +LRVs=ATs*(SRs-ARs);// in Rs +LRVu=ATu*(SRu-ARu);// in Rs +//Labour Mix variance +TAMT=ATs+ATu;// total of actual mix time +TSMT=STs+STu;// total of standard mix time +RSTs=(STs*TAMT)/TSMT +RSTu=(STu*TAMT)/TSMT +LMVs=SRs*(RSTs-ATs);// in Rs +LMVu=SRu*(RSTu-ATu);// in Rs +//Labour Sub Efficiency variance +LSEVs=SRs*(STs-RSTs);// in Rs +LSEVu=SRu*(STu-RSTu);// in Rs +disp("Labour Cost variance :") +disp(LCVs,"Labour Cost variance LCVs: ") +disp(LCVu,"Labour Cost variance LCVu: ") +disp(LCVs+LCVu,"Labour Cost variance :") +disp("Labour Efficiency variance :") +disp(LEVs,"Labour Efficiency variance LEVs: ") +disp(LEVu,"Labour Efficiency variance LEVu: ") +disp(LEVs+LEVu,"Labour Efficiency variance :") +disp("Labour Rate variance :") +disp(LRVs,"Labour Rate variance LRVs: ") +disp(LRVu,"Labour Rate variance LRVu: ") +disp(LRVs+LRVu,"Labour Rate variance :") +disp("Labour Mix variance :") +disp(LMVs,"Labour Mix variance LMVs: ") +disp(LMVu,"Labour Mix variance LMVu: ") +disp(LMVs+LMVu,"Labour Mix variance :") +disp("Labour Sub Efficiency variance :") +disp(LSEVs,"Labour Sub Efficiency variance LMVs: ") +disp(LSEVu,"Labour Sub Efficiency variance LMVu: ") +disp(LSEVs+LSEVu,"Labour Sub Efficiency variance :") +disp("Negative variances indicate adverse value "); +disp("Positive variances indicate favourable value "); \ No newline at end of file -- cgit