Mechanic printout

Mechanic printout - -Program Description:This program will...

Info iconThis preview shows pages 1–2. Sign up to view the full content.

View Full Document Right Arrow Icon

Info iconThis preview has intentionally blurred sections. Sign up to view the full version.

View Full DocumentRight Arrow Icon
This is the end of the preview. Sign up to access the rest of the document.

Unformatted text preview: { ----------------------------------------------------------Program Description:This program will use procedures to compare the prices of two different mechanics. It will accept the number of hoursit will take to complete the job and then calculate the price of the services. pg.142 ------------------------------------------------------------}program Mechanics(input.output);var hrs,{the number of hours it will take to complete the job}quarterhrs,{the number of quarter hours it will take to complete the job}mechanic1charge,{the price that the first mechanic will charge}mechanic2charge{the price that the second mechanic will charge}: real;{they are all real numbers}{-----------------------------------------------------------PromptForInput:This procedure prompts the user to enter the hours it will take to complete the job. It will assign their answer to the variable hrs.------------------------------------------------------------}Procedure GetData(var hrs:real);begin writeln('Please enter the number of hours you expect the job to take, then press return:');...
View Full Document

This note was uploaded on 03/27/2008 for the course CPSC 110 taught by Professor Logan during the Spring '07 term at Texas A&M.

Page1 / 3

Mechanic printout - -Program Description:This program will...

This preview shows document pages 1 - 2. Sign up to view the full document.

View Full Document Right Arrow Icon
Ask a homework question - tutors are online