Begin9. Даны два неотрицательных числа $$a$$ и $$b$$. Найти их среднее геометрическое, то есть квадратный корень из их произведения: $$\sqrt{a*b}$$ .
Решение:
1 2 3 4 5 6 7 8 9 10 11 |
program Begin9; var a,b,SG: Real; begin Write('Введите число a: '); Readln(a); Write('Введите число b: '); Readln(b); SG:=sqrt(a*b); Writeln('Среднее геометрическое a и b равно: ',SG); end. |
Другие задачи из раздела Begin можно посмотреть здесь.
Комментарии: