Solved

Please help as soon as possible.

Posted on 2004-04-28
36
161 Views
Last Modified: 2010-04-05
Problem1: Five rand shop(all items costs R 5), according to costomer type....
a. scholar gets 10% discount.
b. student gets 5% discount.
c.pentioner gers 20% discount.

I need (total) prise value, (discount) value and (amount due) value.

Thanks

0
Comment
Question by:Preditor123
  • 11
  • 7
  • 6
  • +2
36 Comments
 
LVL 27

Expert Comment

by:kretzschmar
ID: 10938558
?? homework ??
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10938599
Yup!

Shane
0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10938680
Meikl Investigation LTD -  Homeworks discovering....
Teachers never been so warranted as now :))))))

F68 ;-)

0
Industry Leaders: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

 
LVL 11

Expert Comment

by:calinutz
ID: 10939128
:)))))))))
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939269
I guess he didn't like your answer Meikl.... Im glad he didn't do a split.....

<SMILE>

Shane
0
 

Author Comment

by:Preditor123
ID: 10939300
Will you help with the code, I am still a novice and try to understand how these programs work, to lead by example.
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939358
Why did you close the question out?

Why didn't you respond when kretzschmar asked if this was a home work assignment (which it has all the characteristics of)?

If you are a novice, and you are trying to understand how programs work, - you dont ask a question like the one above.

Shane




0
 

Author Comment

by:Preditor123
ID: 10939363
To shane.....

Since you are so active in this site, please give a hand with my problem, I have many more to complete. Don't wast you talent!

Be happy
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939376
You will need to post questions, so all experts have an opportunity to participate.....

Again, that can't be homework assignments....


Shane
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939417
OK, what is going on here..... kretzschmar, i think he needs help on using EE

Shane
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939544
Thanks Meikl!

Shane
0
 

Author Comment

by:Preditor123
ID: 10939565
I am trying to learn how to program in delphi. I use a text book "Introducing Delphi Programming". The problem that a try to solve is problems in the text book. I do this in my spare time, and I don't have a lot of it. This is not homework or assignment, I just want help.

0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10939567
mmm...until now i've smiled reading this thread, but now i think that there's something wrong in the air...

Preditor123, note that this is not the right way to get help from Ex-ex experts....joking is good for a while, persistence is quiet an offending action....
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939679
ok, the only person who hasnt had their answer accepted so far is calinutz.

:)

Shane
0
 

Author Comment

by:Preditor123
ID: 10939691
Ferruccio68

Please show me the right way to get help, I am willing to learn, if you are offering.
0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10939729
Suggestion to the P.E. :
Ask for a moderator to investigate in this thrade and eventually lock the Preditor123 account....
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939746
Actually, Ferruccio68, i dont think he is being malicious, I truly dont think he knows what is is doing. Meikl! has  asked him to go and read the help sections, but so far, he has not done so.....


Shane
0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10939912
mmm...shane, i'd understand if it was the first or the second time...but re-accepting a different non-answer for 3 times seems simply a joking game...

0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10939924
Maybe....

Shane
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10940235
Sounds good to me!

Shane
0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10940365
and now guys? what about this?

BTW for locking account i'was meaning about a Community Support Moderator action, not by PE... maybe he could decide to freeze his account for a few time....
0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 10940413
@phew, guessing i need a moderator ...

i guess too...

Shane: you're in Ex-Ex Guinness: two time accepted in the same thread without posting an answer :))))
0
 
LVL 11

Expert Comment

by:shaneholmes
ID: 10940442
:)))))

Shane
0
 

Accepted Solution

by:
Preditor123 earned 0 total points
ID: 11377499

procedure TfrmFiveRandShop.radScholarClick(Sender: TObject);
const Item = 5;
ScholarDiscount = 0.1;

var Scholar, Discount, AmountDue, Total : double;

begin
  Scholar := StrToFloat(sedNumberOfItems.Text);
  Total := Scholar * Item;
  edtTotal.Text := 'R ' + FloatToStrF(Total,ffFixed,8,2);

  Discount := Total * ScholarDiscount;
  edtDiscount.Text := 'R ' + FloatToStrF(Discount,ffFixed,8,2);

  AmountDue := Total - Discount;
  edtAmountDue.Text := 'R ' + FloatToStrF(AmountDue,ffFixed,8,2);
end;

procedure TfrmFiveRandShop.radStudentClick(Sender: TObject);
const Item = 5;
StudentDiscount = 0.05;

var Student, Discount, AmountDue, Total : double;

begin
  Student := StrToFloat(sedNumberOfItems.Text);
  Total := Student * Item;
  edtTotal.Text := 'R ' + FloatToStrF(Total,ffFixed,8,2);

  Discount := Total * StudentDiscount;
  edtDiscount.Text := 'R ' + FloatToStrF(Discount,ffFixed,8,2);

  AmountDue := Total - Discount;
  edtAmountDue.Text := 'R ' + FloatToStrF(AmountDue,ffFixed,8,2);
end;

procedure TfrmFiveRandShop.radPensionerClick(Sender: TObject);
const Item = 5;
PensionerDiscount = 0.2;

var Pensioner, Discount, AmountDue, Total : double;

begin
  Pensioner := StrToFloat(sedNumberOfItems.Text);
  Total := Pensioner * Item;
  edtTotal.Text := 'R ' + FloatToStrF(Total,ffFixed,8,2);

  Discount := Total * PensionerDiscount;
  edtDiscount.Text := 'R ' + FloatToStrF(Discount,ffFixed,8,2);

  AmountDue := Total - Discount;
  edtAmountDue.Text := 'R ' + FloatToStrF(AmountDue,ffFixed,8,2);
end;

0
 
LVL 27

Expert Comment

by:kretzschmar
ID: 11377685
glad, you got it solved byself,

sorry, that this question is a bit mixed

-> you may ask at community-support topic for paq this q
and refund points

meikl ;-)
0
 

Author Comment

by:Preditor123
ID: 11377782
Hello Kretzschmar

Will you please add me in the following...

I have read the help file, and it was very helpfull. I went to the Cummunity Support Resouse Channel to awnser my own question, but my question is not availible to me any more. I want to close this question and ask for refund of points.

Will you please aid me to how I should go about my request.

Thx

Preditor    

0
 
LVL 22

Expert Comment

by:Ferruccio Accalai
ID: 11377876
Hi Preditor....
first: Don't click that accept  button until you find a right and useful solution to your question....
Accept means that you want to accept a comment as an answer to your question and this will clos the question itself....
To add comments just write into the Post a Comment Box and click Submit. You don't have to Accept until you really want to close the question...

Second: to ask for closing and refunding you have to post a question On Community Support (here: http://www.experts-exchange.com/Community_Support/) with a link to the question that you want to delete or close because was answered by yourself....

So now you could go there post a question to Unaccept, PAQ and refund points for this question...hope this help and clearify how to feel this forum
F68 ;-)
0

Featured Post

Free Tool: SSL Checker

Scans your site and returns information about your SSL implementation and certificate. Helpful for debugging and validating your SSL configuration.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Introduction I have seen many questions in this Delphi topic area where queries in threads are needed or suggested. I know bumped into a similar need. This article will address some of the concepts when dealing with a multithreaded delphi database…
Introduction Raise your hands if you were as upset with FireMonkey as I was when I discovered that there was no TListview.  I use TListView in almost all of my applications I've written, and I was not going to compromise by resorting to TStringGrid…
With Secure Portal Encryption, the recipient is sent a link to their email address directing them to the email laundry delivery page. From there, the recipient will be required to enter a user name and password to enter the page. Once the recipient …
Are you ready to implement Active Directory best practices without reading 300+ pages? You're in luck. In this webinar hosted by Skyport Systems, you gain insight into Microsoft's latest comprehensive guide, with tips on the best and easiest way…

733 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question