fork download
  1. program primaprova;
  2. var a, b, c : integer;
  3. vivo: boolean;
  4. mychar: char;
  5. mystring:string;
  6.  
  7. begin
  8.  
  9. {riga di commenti}
  10.  
  11. read(a);
  12. read(b);
  13. writeln('somma a+b = ', c);
  14. mystring := 'hello world ';
  15. writeln(mystring, mystring);
  16. writeln('vv');
  17. writeln('aa');
  18. end.
Success #stdin #stdout 0s 5276KB
stdin
4 5
stdout
somma a+b = 0
hello world hello world 
vv
aa