Предмет: Информатика,
автор: dan2223445
даны три числа . найти среднее арифметическое и среднее геометрическое этих чисел.
Паскаль,для программы Algo
Ответы
Автор ответа:
0
PascalABC.NET 3.4.2, сборка 1864 от 11.11.2018
begin
var (a, b, c) := ReadInteger3('a,b,c->');
Println('Среднее арифметическое:', Round((a + b + c) / 3, 3));
Println('Среднее геометрическое:', Round(Power(a * b * c, 1 / 3), 3));
end.
Приложения:
Похожие вопросы
Предмет: История,
автор: boranbajazar556
Предмет: Математика,
автор: MrLexaX3
Предмет: Математика,
автор: Аноним
Предмет: Химия,
автор: zgh0211
Предмет: Физика,
автор: Аноним