: The Cluck Egg Company has different prices for their eggs, based
: upon the number sold:
: 0 up to but not including 4 dozen: $0.50 per dozen
: 4 up to but not including 6 dozen: $0.45 per dozen
: 6 up to but not including 11 dozen: $0.40 per dozen
: 11 or more dozen : $0.35 per dozen
: *Extra eggs are priced at 1/12 the per dozen price each
: Write a program that allows the user to input the number of eggs
: wanted, and then calculates the bill. Example of Output:
: Enter number of eggs: 126
: Purchase: 10 dozen and 6 extra eggs
: Your bill comes to $ 4.20
: This program uses if, then, and else. I know how to do this problem,
: its just I don't know how to put it into a program effectively.
: If anybody could help me with this, it would be much appreciated.
Good day firstly I think ur post would have been more appropriate in the pascal forum.
Never the less here is the code that would do it the best.
N,Dozen : Integer;
PricePDozen, PricePerEgg, Price : Real;
Writeln('How many eggs do u want: ');
Dozen = N div 12;
Case Dozen of
0..3 : PricePerDozen := 0.5;
4..5 : PricePerDozen := 0.45;
6..11 : PricePerDozen := 0.4;
Else PricePerDozen := 0.35;
PricePerEgg := PricePerDozen /12;
Price := PricePerEgg * N;
Writeln('The total cost of your eggs will be: ',Price:2:2);
Darkwing Duck aka DWduck signing off :)