Ввести три натуральных числа. Найти их 'среднее арифметическое, геометрическое, гармоническое A B C
Ввести три натуральных числа. Найти их 'среднее арифметическое, геометрическое, гармоническое
A B C
Гость
Ответ(ы) на вопрос:
Гостьprogram Znanija;
var a,b,c:integer;
begin
readln(a,b,c);
writeln('Среднее арифметическое: ', (a+b+c)/3);
writeln('Среднее геометрическое: ', sqrt(a*b*c));
writeln('Среднее гармоническое: ', 3/((1/a)+(1/b)+(1/c)));
end.
Не нашли ответ?
Похожие вопросы