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