fork download
copy 
  1. program HelloWorld;
  2. var x,a,b:real;
  3. begin
  4. x:=10
  5. a:=2; b:=2;
  6. while x>0 do begin
  7. if x mod 2>0 then a:=a+x mod 8
  8. else 
  9. b:=b+(x mod 8);
  10. x:= x div 8;
  11. end;
  12.     writeln(a);
  13.     write(b);
  14. end.
  15.  
Compilation error #stdin compilation error #stdout 0s 336KB
comments (?)
stdin
copy 
Standard input is empty
compilation info 
Free Pascal Compiler version 3.0.0+dfsg-10 [2016/12/12] for x86_64
Copyright (c) 1993-2015 by Florian Klaempfl and others
Target OS: Linux for x86-64
Compiling prog.pas
prog.pas(5,1) Fatal: Syntax error, ";" expected but "identifier A" found
Fatal: Compilation aborted
Error: /usr/bin/ppcx64 returned an error exitcode
stdout
copy 
Standard output is empty
https://ideone.com/ib9Vsm
language:
Pascal (fpc 3.0.4)
created:
5 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!