Вычислить среднее арифметическое и среднее геометрическое 4 и 6

Question

Информатика

Антонка

16 сентября, 00:06

Вычислить среднее арифметическое и среднее геометрическое 4 и 6

+1

Ответы (1)

Знаете ответ на вопрос?

Петрака · Answer 1

Program fofgogjoj;

var

a, b:integer;

sa, sg:real;

begin

a:=4;

b:=6;

sa: = (a+b) / 2;

sg:=exp (ln (a*b) / 2) ;

Writeln ('Среднее арифметическое=', sa:0:3) ;

Writeln ('Среднее геометрическое=', sg:0:3) ;

end.