Дан код программы, дополните программу комментариями.

var

s: char;

begin

read(s);

case s of

'а','е','ё','и','о','у','ы','э','ю','я': writeln('гласные');

'б','в','г','д','ж','з','й','к','л','м','н','п','р','с','т','ф','х','ц','ч','ш','щ': writeln('согласные');

else

writeln('знаки');

end;

Анастасия186186    1   15.05.2020 12:36    3