Simple one for delphi newbie

Hi

I need help with a function that calculates costs of using the internet at a internet cafe. The cost is $25 per hour calculated half-hourly. So each half hour is 1 Unit. If the time is 30mins that should be 1 Unit and 31Mins 2 Units etc etc

I am having problems working out how many units have been used. At the moment if you have been using it for 30mins you are charged 2 Units(where it should be 1):

function GetUnits(pintTotalMins: Integer) : Integer;
begin
        GetUnits := (pintTotalMins DIV 30) + 1
end;

Cheers,

S
G-LoveAsked:
Who is Participating?
 
JDNConnect With a Mentor Commented:
This should work:

GetUnits := ((pintTotalMins - 1) DIV 30) + 1
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.