Вычислить значение выражения - Pascal ABC (12607)

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

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

Составить алгоритм и написать решение задачи на Паскале: Вычислить: где х - произвольное число, введенное пользователем с клавиатуры. Помогите пожалуйста! Решение желательно на уровне 10-11 класса.

Решение задачи: «Вычислить значение выражения»

textual
Листинг программы
var x, y: real;
begin
  write('x = ');
  readln(x);
  if x = 10
    then writeln('Значение функции не определено')
    else begin
      if x > -10 
        then y := x * x * x - abs(x - 12)
        else y := 2 * x * x * x * x * x - abs(x);
      writeln('y = ', y)
    end
end.

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

  1. Объявляются две переменные типа real: x и y.
  2. Выводится сообщение «x = », после чего считывается значение переменной x.
  3. Проверяется условие x = 10. Если оно истинно, выводится сообщение «Значение функции не определено».
  4. Если условие x = 10 ложно, выполняется следующий блок кода.
  5. Вычисляется значение выражения y := x x x - abs(x - 12).
  6. Если x > -10, значение выражения y присваивается переменной y.
  7. Если x <= -10, значение выражения y присваивается переменной y.
  8. Выводится значение переменной y с помощью функции writeln().

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

8   голосов , оценка 4.5 из 5