Заданы 3 числа. ИМзвестно, что дваиз них равны между собой, а третье отлично от них. Составьте программу для нахождения числа, отличного от других

Question

Информатика

Ксюта

12 декабря, 03:04

Заданы 3 числа. ИМзвестно, что дваиз них равны между собой, а третье отлично от них. Составьте программу для нахождения числа, отличного от других

+3

Ответы (1)

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

Максимильянка · Answer 1

var a, b, c:integer;

begin

clrscr;

readln (a, b, c) ;

if a = b then writeln (c) ;

if b = c then writeln (a) ;

if a = c then writeln (b) ;

readkey;

end.