Pascal problem Pls help

[Mr.Freak]

i need to write program that calculates when airplane is going to lend. i started to write this but i have got some problems pls help but when i tested minutes and seconds are not true

program airplane;
var
a,s,d,f,g,h,j,k,l,z,x,c:Real;
writeln('When will airplane airborn:');
readln(a,s,d);
writeln('How much time is airplane in the air:');
readln(f,g,h,);
j:= ( ( a * 3600 ) + ( s * 60 ) + d + ( f * 3600 ) + ( g * 60 ) + h ) );
if j > 24 then writeln(

[TrustyTony]

You prepare time as seconds but test it as it where hours at last partial line. Better not to say what I think of your variable names ;)