Даны три целых числа, одно из которых отлично от двух других равных между собой. Определить порядковый номер числа, отличного от остальных

Question

Алексюша

24 декабря, 15:43

+4

Ответы (1)

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

Римуля · Answer 1

var a, b, c:integer;

Begin

read (a, b, c) ;

if b=с then writeln (1) ;

if a=с then writeln (2) ;

if b=a then writeln (3) ;

End.