C1: ГВЖЕДБА
C2: тут не совсем понятно записано это числа такие <span>6610, 6910 или эти последние 10ки означают что число 66 в десятичной и 69 в десятичной? если это так, то подходит только 3 вариант, т.к.
</span>1000011₂=67₁₀ => A=66, B=69, C=67, т.е. A<C<B
Program n1;
var a,b: integer;
begin
readln(a,b);
writeln('срзнач: ',(a+b)/2);
write('сргеом: ',sqrt(a*b));
end.
Ответ F∨F=<span>F
как и при умножении</span>
===== PascalABC.NET =====
function F(x: real) := x - 1 / (3 + Sin(3.6 * x));
begin
var (a, b, eps) := (0.0, 0.85, 1e-5);
var x: real;
while Abs(F(a) - F(b)) >= eps do
begin
x := (a + b) / 2;
var y := F(x);
Writeln('Интервал (', a, ',', b, '), x = ', x, ', y =', y);
if Sign(y) = Sign(F(a)) then
a := x
else
b := x
end;
x := (a + b) / 2;
Writeln('Решение: х = ', x, ', y = ', F(x))
end.