Даны два числа, если 1>2, то составить программу для нахождения среднего арефметического. Если 2>1, то для нахождения среднего геометрического.

Можно в паскале

Question

Информатика

Онисим

22 сентября, 23:48

Даны два числа, если 1>2, то составить программу для нахождения среднего арефметического. Если 2>1, то для нахождения среднего геометрического.

Можно в паскале

+1

Ответы (1)

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

Доминика · Answer 1

Var sa, sg, a, b:real;

begin

write ('a: ') ;

readln (a) ;

write ('b: ') ;

readln (b) ;

sa: = (a+b) / 2;

sg:=sqrt (a*b) ;

if a>b then writeln (sa)

else writeln (sg) ;

end.

Даны два числа, если 1>2, то составить программу для нахождения среднего арефметического. Если 2>1, то для нахождения среднего геометрического.Можно в паскале

Даны два числа, если 1>2, то составить программу для нахождения среднего арефметического. Если 2>1, то для нахождения среднего геометрического.

Можно в паскале