Localize file www.TrSek.com/cover/mojzis/o_brckavych_zatvorkach.pas{ ============== }
{ KSP 15. rocnik 1212: O brckavych zatvorkach Copyright (c) Jan Mojzis }
{ ============== }
{ Zadanie: }
{ Napiste program, kt. moze byt skompilovany oboma druhmi kompilatorov Pascalu }
{ a po spusteni vypise ANO, ak bol skompilovany kompilatorom s vnorenym }
{ zatvorkovanim a NIE, ak bol skomp. kompilatorom s nevnorenym zatvorkovanim }
{ ---------------------------------------------------------------------------- }
{ Zistil som ze sa to da aj takto. }
{ Tie uvodzovky su tam dolezitou sucastou, lebo {{} ale } uz nechce uznat, ked }
{ nepodporuje vnorene ale {{}'}' mi uzna a teda {{}'}'text - ANO' --> }
{ {{}'text NIE}'{text ANO' pri vnorenom sa neberie do uvahy { pri text, lebo sa}
{ hodi do uvodzovky. }
{ POZNAMKA: }
{ CRT_EFD nie je sucastou tohto riesenia. Kniznicu CRT_EFD pre pracu s }
{ konzolovymi vypismi mozete stiahnut napriklad na: }
{ http://www.stano.wz.sk/index.php?id=8 }
{ }
{ Author: (c) 2007 Jan Mojzis }
{ Date : 06.07.2008 http://www.trsek.com }
program o_brckavych_zatvorkach;
uses
SysUtils, CRT_EFD in 'CRT_EFD.PAS';
begin
{ v prip. ze podp. dvojite komentare, tak sa do uvahy }
{ neberie prvy apostrof ale az ten druhy a teda: }
{ 'NIE' --> NIE'ANO' a NIE bude este zrusene, ANO uz nie }