![Heyakzhek](https://sproshu.net/uploads/ava/2/ava9564.jpg)
Heyakzhek
4 год назад
Даны два числа, если 1>2,то составить программу для нахождения среднего арефметического. Если 2>1, то для нахождения среднего геометрического.Можно в паскале
ОТВЕТЫ
![Carr Ronald](https://sproshu.net/uploads/ava/3/ava905.jpg)
Carr Ronald
Oct 24, 2020
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.
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.
542
Нужен срочно ответ?
1 Зарегистрируйся
2 Пополни баланс баллов
3 Назначь баллы за ответ
Чем больше баллов, тем выше веротяность скорого ответа
Смежные вопросы: