Помогите по программированию в Pascal)
Вот задание: Ввести имя, отчество и фамилию человека (в одну переменную). Определить пол человека (по отчеству).
Ответы
Ответ дал:
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.
var
a:string;
begin
read(a);
if copy(a,length(a),1)='ч' then writeln('Муж');
if copy(a,length(a),1)='а' then writeln('Жен');
end.
FantomaSkaRus1:
Она определяет по последней букве, так что пиши отчество последним
Может кинешь ссылку?)
Вас заинтересует
10 месяцев назад
6 лет назад
7 лет назад