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



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

[email protected] в категроии Информатика, вопрос открыт 21.05.2017 в 21:04

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

1 ответ



IrinaFom , ответ добавлен 21.05.2017 в 21:29

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.

Оставлять ответы могут только авторизированные пользователи.
Зарегистрируйтесь или авторизируйтесь на сайте чтобы оставить ответ на вопрос.