代码大全

MaximumEmployees
1000
,

Pascal PhoneLength_c
7 :
Const
PhoneLength_c = 7; PhoneLength
Type
EmployeePhone_t=array[l..PhoneLength_c] of char;

{ make sure all characters in phone number are digits }
for i:=1 to PhoneLength_c do
if PhoneNumber[i]<‘0’ or PhoneNumber[i] ’9’ then
{do some error processing}

7

PhoneLength_c

2 3 4 5

67 8 9

,