program firstproject; {$mode objfpc}{$H+} begin writeln('A Free Pascal progam'); {$IFDEF WINDOWS} readln; {$ENDIF} end.