Вычислить значение функции - PascalABC.NET (24837)

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

Вычислить значение функции '

y=sqr(x)-ln(1+x)-3

'для вводимого с клавиатуры значения х. Методические указания: 1. Определить ОДЗ функции. 2. Ввести значение х с клавиатуры: Ø если х не принадлежит ОДЗ, выдать соответствующее сообщение и передать управление на ввод нового значения х. Ø если х принадлежит ОДЗ, вычислить значение функции для заданного значения х; 3. Вывести результаты счёта на экран, используя возможности модуля Crt (очистка экрана, установка цвета фона и выводимых символов, “окон“, вывод информации в нужное место экрана). 4. Организовать в программе запрос на продолжение и прекращение счета. Рассчитать значение функции для 5-6 значений х, построить график. 5. Выводимая на экран информация должна содержать: Ø тему работы, Ø номер варианта, Ø фамилию и имя студента, код группы, Ø результаты счёта в форматном виде (например, х=2,5 у=3,456). Очень прошу!

Решение задачи: «Вычислить значение функции»

Листинг программы

  repeat
    write('x = ');
    readln(x);
    if x <= -1 then writeln('Функция не определена')
  until x > -1;

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

В данном коде выполняется следующая последовательность действий:

Запрос на ввод значения переменной x.
Проверка диапазона введенного значения x. Если x меньше или равно -1, то выводится сообщение Функция не определена.
Повторение шагов 1 и 2 до тех пор, пока значение x не будет больше -1.