Даны значения а b c. Составить программу вычислений значения наименьшего отклонения...

Question

Даны значения а b c.
Составить программу вычислений значения наименьшего отклонения каждого из трёх чисел от их среднего арифметического значения и печати его значения и имени соответствующей переменной.

Comments

на каком языке?

---

Турбо Паскаль

---

Пожалуйста

---

Странно. Есть среднее значение некоторых чисел. Каждое число если и отличается от него, то на величину, равную разности между этим числом и средним значением. О каком НАИМЕНЬШЕМ ОТКЛОНЕНИИ КАЖДОГО ЗНАЧЕНИЯ идет речь, если оно всегда только одно?

Answer 1

Var a,b,c,q:real;
begin
read(a,b,c);
q:=(a+b+c)/3;
writeln('a: ',abs(a-q));
writeln('b: ',abs(b-q));
writeln('c: ',abs(c-q));