Написать программу: При вводе одного из символов «у» или»У» выводиться на экран слово «ДА», а при вводе «n» или «N».

Program zadacha_1;
var
Ch:char;
begin
readln (Ch);
case Ch of
‘n’,’N’: writeln(‘нет’);
‘y’,’Y’: writeln(‘да’);
end;
Readln;
end.