write(n,' ворон'); if n div 10 <> 1 then case n mod 10 of 1: write('а'); 2..4: write('ы') end; writeln;