Program Example7; { Program to demonstrate the Ceil function. } Uses math; begin Writeln(Ceil(-3.7)); // should be -3 Writeln(Ceil(3.7)); // should be 4 Writeln(Ceil(-4.0)); // should be -4 end.