Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. Решить задачу на языке Паскаля.

Question

Информатика

Грунятка

2 ноября, 12:41

Известно, что из четырех чисел a1, a2, a3, a4 одно отлично от трех других, равных между собой. найдите это число. Решить задачу на языке Паскаля.

+3

Ответы (1)

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

Игорек · Answer 1

Var a1, a2, a3, a4:real;

begin readln (a1, a2, a3, a4) ;

if (a1a2) and (a1a3) then writeln (a1) ;

if (a2a1) and (a2a3) then writeln (a2) ;

if (a3a1) and (a3a2) then writeln (a3) ;

if (a4a3) and (a4a2) then writeln (a4) ;

end.