Так же как клаома и грогха
B) power(4, 2.5) + sqrt(1148.25 - power(1.1, 4)) / (156*cos(25*pi/180) + 2.6)
c) 148/abs(2.6 - power(1.4, 3)) + 18.1
2. √(ab) + 2a
---------------
b^2 + 2.3
3. var a: integer, V: integer
BEGIN
write ('Vvedite rebro a'); readln (a);
V = a*a*a;
writeln ('Ob'em kuba V = ', V);
END.
===== PascalABC.NET =====
begin
var (x, y) := ReadReal2('Введите X, Y:');
if (x * x + y * y <= 9) and (x * x + y * y >= 4) and
(x <= 0) and (y >= 0) or
(x * x + y * y <= 4) and (x >= 0) and (y <= 0) then
Writeln('Да')
else
Writeln('Нет')
end.
x не может быть отрицательным (т.к. нельзя извлечь корень из числа, которое меньше нуля)
Знаменатель не может быть нулём, т.е. x-1 не равен нулю
Это значит, что x не равен единице
Решаем систему:
x>0
X не равен 1
Имеем, что x>1 (для целых чисел)