Даны 2 целых числа вычислить среднее арифметическое их модулей и среднее геометрическое их модулей
Даны 2 целых числа вычислить среднее арифметическое их модулей и среднее геометрическое их модулей
Гость
Ответ(ы) на вопрос:
Гостьprogram chisla;
var a,b:integer;
q:real;
begin
read(a,b);
q:=(abs(a)+abs(b))/2;
writeln(q);
q:=sqrt(abs(a)*abs(b));
writeln(q);
end.
Не нашли ответ?
Похожие вопросы