program Zadacha; {$APPTYPE CONSOLE} uses SysUtils; var n,i:integer; c:char; f1,f2:text; begin { TODO -oUser -cConsole Main : Insert code here } assign(f1,'text.in'); assign(f2,'text.out'); reset(f1); rewrite(f2); while not eoln(f1) do begin read(f1,c); n:=ord(c); if (n<91) and (n>64)then write(f2,chr(ord(c)+32)) else if (n<122) and (n>96) then write(f2,chr(ord(c)-32)) else if (n<224) and (n>191)then write(f2,chr(ord(c)+32)) else if (n<256) and (n>223) then write(f2,chr(ord(c)-32)) else if (c='³') then write(f2,'²') else if (c='²') then write(f2,'³') else write(f2,c); end; writeln(f2); close(f1); close(f2); end.