home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 10 Tools / 10-Tools.zip / ipo-101.zip / Samples.zip / STRANGE.PAS < prev    next >
Pascal/Delphi Source File  |  1997-09-19  |  162b  |  11 lines
  1. program strange(f, s1, dummy, s2);
  2. var
  3.    f : text;
  4.    s1, s2 : string;
  5.    dummy : real;
  6. begin
  7.    rewrite(f);
  8.    writeln(f, s1);
  9.    writeln(f, s2)
  10. end.
  11.