The first programming project involves writing a simple employee information system. The type definitions for the employee information system are the following:

TYPE Employee_Record IS RECORD
  Name: String(1..15);
  Start_Date: Dates.Date;
  Salary: Currency.Quantity;
END RECORD;

Max_Employees: CONSTANT Integer := 35;

TYPE Employee_File IS 
  ARRAY(1..Max_Employees) OF Employee_Record;

Your program should read in information for no more than 35 employees from a file that you create and should enter that information in the Employee_File array defined above. The start date in the input file should consist of three integer values: month, day and year. The salary should be a floating point number. Your program should convert the date information to type Date as defined by the Dates package. It should convert the salary to type Quantity defined in the Currency package.

Once the information has been read in, your program should print out a report, including all the information in the file. In addition, a bonus (extra) salary amount should be computed and printed for each employee. Employees with over ten years of service should be given a bonus of 10%, other should receive 5%. Also, the average salary should be computed and printed. For each employee, the report should note whether the employee's salary is above the average or below. Use the Put procedures for Dates, and Quantity as appropriate to output the values.

Your program must use the packages Dates, Dates.IO, Currency, and Currency.IO, defined in the textbook. You must complete and test any incomplete parts of these packages.