fork download
copy 
  1. program ghm;
  2.  
  3. var text:string;
  4.     i:integer;
  5.  
  6. begin
  7. write('Dose minima: ');
  8. readln(text);
  9. for i := 1 to 25 do
  10. writeln(text);
  11. end.
Success #stdin #stdout 0s 9136KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
Dose minima:
https://ideone.com/W6cq47
language:
Pascal (gpc 20070904)
created:
6 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!