Ответы на вопрос:
Var b, a, q:real;
Begin
Readln(b);
Readln(a);
q:=b+1/(2*a);
Writeln(q)
End.
Объяснение:
Популярно: Информатика
-
alfiea724.04.2021 00:16
-
Vivy1211.08.2020 20:33
-
annaarzama06.06.2022 16:46
-
anastasanesvido25.02.2023 02:00
-
омега7505.06.2020 21:31
-
DIANA8932026.09.2022 22:45
-
borisrrvdow9kk707.06.2023 15:54
-
1355101226элина06.08.2021 14:17
-
Срочно1938131.10.2020 07:27
-
tnepolu12.08.2021 01:15