Hello, I am new here so Hi to everyone.
My name is Debbie and need help writing a pseudocode for the following program as Im a little confused, heres the program for code:
write a program that can be used to calculate the cost of a phone call. a call is local if the area code is 908, 732, 973, or 201.
for local calls, it is 6 cents per minute for calls that are 5 min or less, 5 cents for calls longer than 5 min, and up to 10 min, and 4 cents for calls longer than 10 min.

for long distance calls it is 12 cents per minute for calls 8 min or less and 9 cents per min that exceeds 8 min.
program should,
1. ask user to input area code, phone number, length of call
2 calculate cost of call
3 output the phone number, length of call and cost of call in seperate boxes with appropriate labels
this is sooo confusing, can anyone help???

8 Years
Discussion Span
Last Post by reddaisy

Oh yeah, I know that input has to be tabbed in and all that, but when I get to the if then else on the compund desicion, im so lost, if someone could walk me thru this Id appreciate it I feel if I know why something has to be, then Ill understand it better and be able to do this-lol


Heres the code but it only calculates local calls. I have to leave the rest on you. :P

Dim LocalCall As Boolean
Dim CallMinute As Integer
Dim TotalCall As Integer
'this is to check if it is a local call
If txtArea.Text = "908" Or txtArea.Text = "732" Or txtArea.Text = "973" Or txtArea.Text = "201" Then
        LocalCall = True
        LocalCall = False
End If

If LocalCall = True Then
    ' local call 5 minutes or less
    If Val(txtMinute.Text) <= 5 Then
        CallMinute = 6
    ' local call 6 minutes to 10 minutes
    ElseIf Val(txtMinute.Text) >= 6 And Val(txtMinute.Text) <= 10 Then
        CallMinute = 5
    ' local call 11 minutes above
        CallMinute = 4
    End If
    'Long distance Call here
End If

'calculate call cos
TotalCall = CallMinute * Val(txtMinute.Text)
MsgBox (TotalCall)

Wow! How did you do that-lol. Thanks, Now I have to study this so I really get it!!

This question has already been answered. Start a new discussion instead.
Have something to contribute to this discussion? Please be thoughtful, detailed and courteous, and be sure to adhere to our posting rules.