Question

Розробити програму, яка за введеним позначенням роду видаватиме назву роду, наприклад «ж»-«жіночий рід». Мова
Паскаль.

Answer 1

Ответ:

program MyProg;

var i: string;

begin

readln(i);

if i = 'ж' then begin

write('женский');

end;

if i = 'м' then begin

write('мужской');

end;

end.

Объяснение: