Помогите решить информатику pascal a b xЗадание 8

Помогите решить информатику pascal a b x
Задание 8

Задать свой вопрос
1 ответ

var y,a,b:real;

   x:integer;

begin

writeln('Введите значения переменных');

writeln('a= '); readln(a);

writeln('b= '); readln(b);

writeln('x= '); readln(x);

y:=sqrt((a+b)/(1-cos(3.6*x)))+3.95;

writeln('y= ',y);

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт