profile
Опубликовано 5 лет назад по предмету Информатика от Джиин

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

  1. Ответ
    Ответ дан fofgogjoj
    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.