program EXERCICIO;varA,B,X: real;beginwriteln('Digite um número para A');read(A);X:=A+B;writeln(X);end.
Standard input is empty
Digite um número para A
The brand new service which powers Ideone!
Widget for compiling and running the source code in a web browser!