fork download
copy 
  1. program EXERCICIO;
  2. var
  3. A, B, C, D, X, X1 ,X2 ,Y ,Y1, Y2 : real;
  4. begin
  5. writeln('Digite um número para A');
  6. read(A);
  7. X:=A+B;
  8. writeln('A soma de A+B é=   ',X);
  9. end.
Runtime error #stdin #stdout 0.01s 4112KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Digite um número para A
https://ideone.com/i9RZB
language:
Pascal (gpc 20070904)
created:
14 years ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!