Составьте программу для нахождения значения y=56-43x+22x2 в паскале

Задача: написать программу на Паскале для нахождения y = 56 - 43x + 22x^2. Пошаговое решение (понятно ученику средней школы) 1) Формула и идея - y зависит от x по выражению: y = 56 - 43*x + 22*x^2. - Нужно получить значение y для заданного x. - В Паскале удобнее сначала вычислить x^2, затем подставить в выражение. 2) Выбор типа переменных - Чтобы программа могла работать как с целыми, так и с дробными x, можно использовать вещественные числа (Real). - Если известно, что x целое и результат всегда целый, можно сделать переменные целыми (Integer), но для общей задачи лучше Real. 3) Алгоритм - Ввести x. - Вычислить x^2 как x*x. - Вычислить y = 56 - 43*x + 22*(x^2). - Вывести y (можно форматировать число). 4) Пример форматирования вывода - Можно вывести y с двумя знаками после запятой: y:0:2. - Если нужен простой целочисленный вывод, можно вывести без форматирования. Код на Паскале (для вещественных x и y) program ComputeY; var x, y: real; begin writeln('Enter x:'); readln(x); y := 56 - 43*x + 22*x*x; writeln('y = ', y:0:2); end. Пояснение к коду - x и y объявлены как real (вещественные числа). - Вводим x через readln(x). - Вычисляем y по формуле: y := 56 - 43*x + 22*x*x; где x*x – это x^2. - Выводим результат: y:0:2 — вывод с двумя знаками после запятой. Пример работы - Ввод: x = 2 - Вычисление: y = 56 - 43*2 + 22*(2^2) = 56 - 86 + 88 = 58 - Вывод: y = 58.00 Дополнительный вариант: целочисленная версия (если точно известно, что x целое, и результат тоже целой величиной) program ComputeYInt; var x, y: integer; begin writeln('Enter x:'); readln(x); y := 56 - 43*x + 22*x*x; writeln('y = ', y); end. Когда использовать - Основная версия на Real подходит для любых чисел x (целых и дробных). - Версия на Integer подходит, если задача явно требует целочисленного вывода и не предполагается ввод вещественных чисел.