Даны

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

Вывести порядковый номер этого числа

Question

Информатика

Всеволодушка

2 марта, 09:52

Даны

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

Вывести порядковый номер этого числа

+3

Ответы (1)

Знаете ответ?

Соломон · Answer 1

Var a, b, c, d: integer;

begin

readln (a, b, c, d) ;

if (a b) then

if (a c) then writeln (1) else writeln (2)

else if (c a) then writeln (3)

else writeln (4) ;

end.

Вот так-то)

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

Даны

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

Вывести порядковый номер этого числа