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

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

Question

Информатика

Любуша

13 октября, 14:02

Помогите по программированию в 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)

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