fork download
copy 
  1. program ideone;
  2. Begin
  3. 	Writeln('**************************************');
  4. 	Writeln('*chuong trinh pascal dau tien cua toi*');
  5. 	Writeln('*            oi! tuyet voi           *');
  6. 	Writeln('**************************************');
  7.     Writeln('   **     *******       *******  ');
  8. 	Writeln('   **     **   **       **       ');
  9.     Writeln('   **     **   **       **       ');
  10. 	Writeln('   *****  *******       *******  ');
  11. 	Writeln('      *         ********       *******     ');
  12. 	Writeln('     ***        **     **     **     **    ');
  13. 	Writeln('    ** **       **     **    **            ');
  14. 	Writeln('   **   **      ********    * *            ');
  15. 	Writeln('  *********     **     **    **            ');
  16. 	Writeln(' **       **    **     **     **      **   ');
  17. 	Writeln('**         **   ********       ********    ');
  18. 	Readln;
  19. End.
Success #stdin #stdout 0s 9128KB
comments (?)
stdin
copy 
Standard input is empty
stdout
copy 
**************************************
*chuong trinh pascal dau tien cua toi*
*            oi! tuyet voi           *
**************************************
   **     *******       *******  
   **     **   **       **       
   **     **   **       **       
   *****  *******       *******  
      *         ********       *******     
     ***        **     **     **     **    
    ** **       **     **    **            
   **   **      ********    * *            
  *********     **     **    **            
 **       **    **     **     **      **   
**         **   ********       ********
https://ideone.com/AgAUAl
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!