Необходимо выполнить на pascal039;eНаписать функции q(x)=sin(x)+2cos(x)+1 и p(t,x)=t/x. Напишите

Необходимо выполнить на pascal'e
Написать функции q(x)=sin(x)+2cos(x)+1 и p(t,x)=t/x. Напишите программку, которая получает введенное число с клавиатуры, подставляет значения в функцию p(q(x),x) и выводит итог на экран.

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

Var q, p, x:real;

Begin

Write ('x=') ;read(x) ;

Q:=sin(x)+2*cos(x)+1;

P:=q/x;

Writeln('p(q(x)) =', p) ;

End.

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


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

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

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

Войти на сайт