Сделать в pascal abc. 1.даны два неотрицательных числа a и b. найти их среднее , т.е. квадратный корень из их произведения: (a*b)1/2 (1/2 это степень). 2.даны два ненулевых числа. найти сумму, разность, произведение и частное их модулей. 3.даны два круга с общим центром и радиусами r1 и r2 (r1> r2). найти площади этих кругов s1 и s2, а также площадь s3 кольца, внешний радиус которого равен r1, а внутренний радиус равен r2: s1=п* (r1)^2, s2=п* (r2)^2, s3=s1 - s2. в качестве значения п использовать 3.14. 4.дана площадь s круга. найти его диаметр d и длину l окружности, ограничивающей этот круг, учитывая, что l=п*d, s=п*d^2/4. в качестве значения п использовать 3.14.
125
377
Ответы на вопрос:
1.var a,b,c: real; begin readln(a,b); c: =sqrt(a*b); writeln('среднее = ',c) end.
Jpeg - joint photographic experts group png - p ortable network graphicsgif - graphics interchange format bmp - bitmap picture
Популярно: Информатика
-
ilonaloginova01.02.2020 03:26
-
оркп02.02.2020 21:53
-
0Pandohcka002.11.2022 14:42
-
fargustyana23.06.2020 03:17
-
haru200001.04.2020 05:20
-
Ёкабоня602.03.2020 09:37
-
ambasaddor20.01.2022 15:49
-
LaGGe03.05.2023 23:54
-
sashaageev0409.03.2020 05:46
-
sashocpinchuk28.03.2022 18:31