Найти y по искомому x - любое число - Pascal

Узнай цену своей работы

Формулировка задачи:

Найти y по искомому x - любое число Если x<-3 , то y=(x^2)/LN(x^2). Если x>13 , то y=x^2. Если -3<=x<=-13 , то y= корень(x-4) - 3. Загвостка в том , что подкоренное выражение x-4 должно быть положительным , то есть промежуток от -3 до 3 не подходит , так как подкоренное выражение будет отрицательным.

Решение задачи: «Найти y по искомому x - любое число»

textual
Листинг программы
var
  x: real;
 
begin
  write('x = ');
  readln(x);
  if x < -3
    then write('y = ', x * x / ln(x * x))
    else if x < 4
      then write('Функция не определена')
      else if x <= 13
        then write('y = ', sqrt(x - 4) - 3)
        else write('y = ', x * x);
  readln
end.

Объяснение кода листинга программы

  1. Объявлена переменная x типа real.
  2. Выводится сообщение x = и происходит чтение значения переменной x с помощью функции readln.
  3. Если значение x меньше -3, то вычисляется значение y как xx/ln(xx) и выводится сообщение y = и значение y.
  4. Если значение x находится в интервале от -3 до 4, то выводится сообщение Функция не определена.
  5. Если значение x находится в интервале от 4 до 13, то вычисляется значение y как sqrt(x-4)-3 и выводится сообщение y =.
  6. Если значение x больше или равно 13, то вычисляется значение y как x*x и выводится сообщение y =.
  7. Происходит чтение значения переменной y с помощью функции readln.

Оцени полезность:

7   голосов , оценка 4 из 5
Похожие ответы