Ответы на вопрос:
//1
var
y, a, b, c, d : real;
begin
readln(a, b, c, d);
y := (a/c) * (b/d) - ((a*b-c)/(c*d));
writeln(y);
end.
//2
uses math;
var
f, a, s : real;
begin
readln(a, s);
f := power(s, 2) + (a / (a+s)) * sqrt(power(s, 2) - s) - 176;
writeln(f);
end.
//3
uses math;
var
z, x, y : real;
begin
readln(x, y);
z := sqrt(abs(x-1) + y) / (1 + power(x, 2));
writeln(z);
end.
Популярно: Информатика
-
Vrronika77820.08.2022 11:52
-
slyusarevqaowko3q30.10.2021 15:23
-
ksysharoma12301.02.2022 00:50
-
NaumovaAlina04.07.2021 22:29
-
2001snk11.12.2022 05:28
-
Anush838316.01.2023 23:59
-
кирилл206211.09.2022 03:57
-
sallga20.06.2021 02:31
-
ольга165601.05.2022 15:30
-
Соня12110329.06.2020 11:16