{ ==============                                                               }
{ 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        }

  writeln({{}'NIE}'{ANO'{});
  readln;
end.