Question

Решите,пожалуйста.Буду благодарна)

Answer 1

8) Область определения функции:

2x + 1 >= 0
2x >= -1
x >= -0.5

20x - 5 <> 0
20x <> 5
x <> 5/20
x <> 1/4

x ∈ [-0.5; 0.25) U (0.25; ∞)

На Паскале вычисление значения этой функции с учетом области определения может выглядеть так:

if (x > -0.5) and (x <> 0.25) then begin
writeln(sqrt(2*x + 1) / (20 * x - 5));
end;

9)

begin
  var price: real;
 
  readln(price);
 
  if price > 3000 then begin
    price := price - price * 0.05;
  end
  else if price > 1000 then begin
    price := price - price * 0.03;
  end;
 
  writeln(price);
end.


10)

begin
  var x, f: real;
 
  readln(x);
 
  f := 0;
 
  if x > 5 then begin
    f := x*x - 1;
  end
  else if x < -2 then begin
    f := 2*x;
  end;
 
  writeln(f);
end.