Question

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

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.

Вот так-то)

Answer 2

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

Алгоритм:

1. Создайте переменную `distinct_number`, которая будет хранить число, отличное от трех других. 2. Создайте переменную `count`, которая будет хранить количество встреченных чисел, равных `distinct_number`. Изначально установите значение `count` равным 0. 3. Считайте четыре целых числа. 4. Проверьте каждое число, и если оно равно `distinct_number`, увеличьте значение `count` на 1. 5. Если значение `count` равно 3, выведите порядковый номер числа, отличного от трех других, равных между собой. 6. Если значение `count` не равно 3, выведите сообщение о том, что введены некорректные данные.

Пример кода на Python:

distinct_number = None
count = 0

# Ввод четырех чисел
numbers = []
for i in range(4):
    number = int(input(f"Введите число {i+1}: "))
    numbers.append(number)

# Проверка каждого числа
for number in numbers:
    if distinct_number is None:
        distinct_number = number
        count += 1
    elif number == distinct_number:
        count += 1

# Вывод порядкового номера или сообщения об ошибке
if count == 3:
    distinct_index = numbers.index(distinct_number) + 1
    print(f"Порядковый номер числа, отличного от трех других, равных между собой: {distinct_index}")
else:
    print("Введены некорректные данные.")

При выполнении этого кода вам будет предложено ввести четыре целых числа. Затем код проверит каждое число и выведет порядковый номер числа, отличного от трех других, если такое число будет найдено. Если введены некорректные данные, будет выведено сообщение об ошибке.

Надеюсь, это помогло! Если у вас есть какие-либо дополнительные вопросы, пожалуйста, дайте мне знать.