26 Янв 20150 КомментариевPascal Решение задачи Begin9 Условие задачи:Даны два неотрицательных числа a и b. Найти их среднее геометрическое, т. е. квадратный корень из их произведения: (a·b)1/2. uses PT4; var a, b: real; begin Task('Begin9'); read(a, b); write(sqrt(a * b)); end. Поделиться:
