Задача
Среди трех чисел найти среднее. Если среди чисел есть равные, вывести сообщение "Ошибка".
Решение
Алгоритм решения задачи:
Хотя задача кажется простой, ее решение не такое очевидное. Можно, например, проверить каждое число, лежит ли оно между двумя другими. Или найти минимальное из трех, после чего вывести минимальное из оставшихся двух. Ниже выбран первый способ.
- Исключаем равенство чисел. Если первое число равно второму или первое равно третьему или второе равно третьему или все три числа равны (первое равно второму и второе равно третьему), то вывести сообщение "Ошибка". Иначе переходим к п. 2.
- Проверяем лежит ли первое число между вторым и третьим. Если первое число больше второго, но меньше третьего (т.е. второе минимально), или первое число меньше второго, но больше третьего (т.е. третье минимально), то значит оно среднее. Иначе переходим к п. 3.
- Проверяем лежит ли второе число между первым и третьим. Если второе число больше первого, но меньше третьего, или меньше первого, но больше третьего, то оно среднее. Иначе переходим к п. 4.
- Среднее число третье, так как ни один другой вариант не подошел. Действительно, числа не равны друг другу, первое и второе числа средними не являются.
Вводятся три разных числа. Найти, какое из них является средним (больше одного, но меньше другого).
Проверить, лежит ли первое число между двумя другими. При этом может быть два случая:
- первое больше второго и первое меньше третьего,
- первое меньше второго и первое больше третьего.
Если ни один из вариантов не вернул истину, значит первое число не среднее. Тогда проверяется, не лежит ли второе число между двумя другими. Это может быть в двух случаях, когда
- второе больше первого и меньше третьего,
- второе меньше первого и больше третьего.
Если эти варианты также не вернули истину, то остается только один вариант — посередине лежит третье число.
var
a1 , a2 , a3 : integer ;
begin
write ( ‘Введите три числа: ‘ ) ;
readln ( a1 , a2 , a3 ) ;
if ( ( a1 > a2 ) and ( a1 ) ) or ( ( a1 ) and ( a1 > a3 ) ) then
writeln ( a1 )
else
if ( ( a2 > a1 ) and ( a2 ) ) or ( ( a2 ) and ( a2 > a3 ) ) then
writeln ( a2 )
else
writeln ( a3 ) ;
Среднее арифметическое — это число, равное сумме всех чисел множества, делённой на их количество.
Среднее арифметическое трех чисел вычисляется по формуле:
Xср — среднее арифметическое 3-х чисел;
X1 — первое число;
X2 — второе число;
X3 — третье число.
Быстро выполнить эту математическую операцию можно с помощью нашей онлайн программы. Для этого необходимо в соответствующее поле ввести исходное значение и нажать кнопку.
На этой странице представлен самый простой онлайн калькулятор расчета среднего арифметического трех чисел (среднее между тремя числами). С помощью этого калькулятора вы в один клик сможете рассчитать среднее арифметическое 3-х чисел, если известны исходные числа.