fork download
copy 
  1. program ideone;
  2. var c, temp: char;
  3.     a, b: longint;
  4. begin
  5. 	read(a, temp, c, temp, b);
  6. 	if c = '+' then writeln(a + b) else writeln(a - b);
  7. end.
Success #stdin #stdout 0s 340KB
comments (?)
stdin
copy 
228 + 13
stdout
copy 
241
https://ideone.com/WLvwtA
language:
Pascal (fpc 3.0.4)
created:
8 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!