home *** CD-ROM | disk | FTP | other *** search
/ Chip 1997 October / Chip_1997-10_cd.bin / invex / ozogan / hello.ips < prev    next >
Text File  |  1997-07-13  |  221b  |  13 lines
  1. PROCEDURE main
  2.    VAR
  3.       name : string
  4.    ENDVAR
  5.  
  6.    ConsoleClear;
  7.    WRITE("Zadejte svΘ jmΘno: ");
  8.    READLN(name);
  9.    WRITELN;
  10.    WRITELN("Ahoj, ", name, 
  11.            " zdravφ t∞ OZOGAN KLONDAIK")
  12. ENDPROC
  13.