var
x, a: real;
begin
x := 15;
a := (1 - sqrt(1 + abs(sin(x / 2;
writeln('a = ', a);
end.
Объяснение:
sqrt() - квадратный корень
abs() - модуль
Program Scool;
Var
a,x:real;
Begin
Writeln('Введите переменную x');
Read(x);
A:=(1-Sqrt(1+abs(sin(x/2;
Writeln('ответ=',a:6:4);
End.
Объяснение:
При запуске кода, программа попросит вас ввести переменную x, это может быть любая цифра , если ввести 15 то тебе даст нужный ответ.
Плюс в том что можно ввести любую цифру и тебе даст ответ решения задачи по заданной неизвестной x.
