program PROG8 ( input, output ); var grosspay, ordinary_time, hourlyrate, overtime, ot_rate: real; begin hourlyrate := 4.20; ot_rate := hourlyrate * 1.5; writeln('Please enter the number of hours worked'); readln( ordinary_time ); writeln('Please enter the number of overtime hours'); readln( overtime ); grosspay := (ordinary_time * hourlyrate) + (overtime * ot_rate); writeln('The gross pay is $', grosspay:5:2 ) end.