fork download
copy 
  1. program ideone;
  2. begin
  3. 	writeln('The Pascal Subtract/Divide Program.');
  4. 	writeln('NUM1 ',50,' NUM2 ',25,' THE3 ',(50 - 25));
  5. 	writeln('NUM4 ',289,' NUM5 ',17,' NUM6 ',(289 / 17));
  6. end.
Success #stdin #stdout 0s 5288KB
comments (?)
stdin
copy 
1
2
10
42
11
stdout
copy 
The Pascal Subtract/Divide Program.
NUM1 50 NUM2 25 THE3 25
NUM4 289 NUM5 17 NUM6  1.7000000000000000E+001
https://ideone.com/OrsEaM
language:
Pascal (fpc 3.0.4)
created:
1 day 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!