program ideone;var a, b, max: real;beginRead (a);Read (b);begin if a>b then max:=a else max:=b;end;end.
Standard input is empty
Standard output is empty
./prog: attempt to read past end of Input (error #454 at 402a9b)
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!