Помогите по программированию в Pascal)

Вот задание: Ввести имя, отчество и фамилию человека (в одну переменную). Определить пол человека (по отчеству).

Question

Информатика

Катюся

10 января, 17:18

Помогите по программированию в Pascal)

Вот задание: Ввести имя, отчество и фамилию человека (в одну переменную). Определить пол человека (по отчеству).

+1

Ответы (1)

Знаете ответ на вопрос?

Алексий · Answer 1

Program A1;

var

a:string;

begin

read (a) ;

if copy (a, length (a),1) = 'ч' then writeln ('Муж') ;

if copy (a, length (a),1) = 'а' then writeln ('Жен') ;

end.

Помогите по программированию в Pascal)Вот задание: Ввести имя, отчество и фамилию человека (в одну переменную). Определить пол человека (по отчеству).

Помогите по программированию в Pascal)

Вот задание: Ввести имя, отчество и фамилию человека (в одну переменную). Определить пол человека (по отчеству).