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