ТутРешу.Ру

Даны 2 числа. Найти среднее арифметическое кубов этих чисел и среднее…

Задание:

Даны 2 числа. Найти среднее арифметическое кубов этих чисел и среднее геометрическое модулей этихчисел.

Решение:

var a, b: real; begin writeln ('Введите два числа'); readln (a, b); //Вводим числа а и b writeln ('Среднее арифметическое кубов этих чисел: ', (a*a*a)+(b*b*b) / 2:0:5); {Печатаем среднее арифметическое кубов этих чисел с округлением до 5 знаков после запятой} writeln ('Среднее геометрическое модулей этих чисел: ', sqrt (abs (a)*abs (b): 0:5); {Печатаем среднее геометрическое модулей этих чисел с округлением до 5 знаков после запятой}end.




Знаете другой ответ?

Отправить свой ответ