Question

Паскаль. f(x)= -3х^2-x^2-x, если х<=-2 или 2х^2-3х, если х>-2нужно составить программу, помогите, пожалуйста.

Answer 1

 Program Funct;

Uses Crt;

var x,rez:real;

begin

     clrscr;

     write('Введите x:');

     readln(x);

     if (x<=-2) then rez:=-3*(x*x)-(x*x)-x

         else rez:=2*(x*x)-3*x;

     writeln('f(x)=',rez:5:5);   

     readkey;

 

end. 

 

 

Answer 2

Я могу помочь вам с программированием на Паскале. Ваша задача состоит в том, чтобы написать программу, которая вычисляет значение функции f(x) в зависимости от значения x. Функция f(x) определена следующим образом:

$$ f(x) = \begin{cases} -3x^2 - x^2 - x, & \text{если } x \leq -2 \text{ или } x \geq 2 \\ 2x^2 - 3x, & \text{если } -2 < x < 2 \end{cases} $$

Один из возможных способов решения этой задачи - использовать оператор case, который позволяет выбрать один из нескольких вариантов в зависимости от значения выражения. Пример программы, которая использует оператор case, можно найти [здесь](https://en.wikibooks.org/wiki/Pascal_Programming/Input_and_Output).

Вот пример программы, которая решает вашу задачу:

program func;
var
  x, y: real;
begin
  write('Введите x: ');
  readln(x);
  case x of
    -2..2: y := 2 * x * x - 3 * x;
    else y := -3 * x * x - x * x - x;
  end;
  writeln('f(', x:0:2, ') = ', y:0:2);
end.

Эта программа считывает значение x с клавиатуры, вычисляет значение y в соответствии с формулой f(x), и выводит результат на экран. Я использовал диапазон -2..2 для проверки условия -2 < x < 2, и ключевое слово else для остальных случаев. Вы можете изменить эту программу по своему усмотрению.

Надеюсь, что это поможет вам с вашей задачей. Если у вас есть еще вопросы по Паскалю, я буду рад ответить на них. Спасибо, что пользуетесь Bing.