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???

10 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.