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

Задача сводится к упрощению выражения и написанию простой консольной программы на Pascal. Пояснение по шагам - Дано: y = 56 - 43x + 22^2. - 22^2 = 484, поэтому y = 56 + 484 - 43x = 540 - 43x. - Если x — целое число, y будет целым. Для вещественного x можно использовать вещественные переменные. Пример программы на Паскале (целочисленная версия) program YValueInteger; uses crt; var x, y: integer; begin Write('Введите x: '); ReadLn(x); y := 56 - 43 * x + 22 * 22; { 22*22 = 484, так же можно писать: y := 540 - 43 * x; } WriteLn('y = ', y); end. Альтернативно можно явно воспользоваться упрощением y = 540 - 43*x: program YValueIntegerAlt; uses crt; var x, y: integer; begin Write('Введите x: '); ReadLn(x); y := 540 - 43 * x; WriteLn('y = ', y); end. Программа для вещественных x (если требуется вводить дробные числа) program YValueReal; uses crt; var x, y: real; begin Write('Введите x: '); ReadLn(x); y := 56 - 43 * x + 22 * 22; { 22*22 = 484, итог: y = 540 - 43*x } WriteLn('y = ', y:0:2); { вывод с двумя знаками после запятой } end. Важно: в Паскале оператор возведения в степень не используется как ^ (это комментарий: ^ — указатель в старых диалектах). Чтобы получить 22^2, удобнее писать 22*22 или использовать соответствующую функцию pow/power в зависимости от компилятора (но для целочисленного выражения 22*22 проще и надёжнее).