program evo; {$APPTYPE CONSOLE} uses SysUtils; var f1,f2:text; s1,s2:string; begin assign(f1,'evo.dat'); { TODO -oUser -cConsole Main : Insert code here } end.