{**********************************************************}
{ }
{ This Program Calculates the Sum of Two Numbers }
{ }
{ Written By : Charla Beaulieu Date : Feb 15, 99 }
{ }
{**********************************************************}
Program Sum;
Uses WinCrt;
Var x,y,z : real;
Begin
WriteLn ('Hello, please enter a number');
Readln (x);
WriteLn ('Please enter a second number');
Readln(y);
z:= x + y;
WriteLn ('The sum of ',x:8:2, ' plus ',y:8:2,' is ',z:8:2);
Writeln ('Thank you for using my program')
End.