Ответы на вопрос:
Var a,b,k: real; begin writeln('введите число а'); readln(a); writeln('введите число b'); readln(b); k: =sqrt(a*b); writeln('среднее равняется ',k); end.
Популярно: Информатика
-
darvin114527.04.2020 14:50
-
kamilamirov77713.05.2023 15:05
-
juliabatrukova19.10.2020 06:53
-
оки824.02.2020 23:05
-
corbaov201809.02.2023 14:56
-
imbiz29.04.2020 02:25
-
Liza1410200429.05.2022 03:32
-
handaa061529.07.2021 12:30
-
natalalebedvt7116.07.2021 18:42
-
bgs654410.07.2021 16:05