составьте программу для нахождения значения 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; { 2222 = 484, итог: y = 540 - 43x } WriteLn('y = ', y:0:2); { вывод с двумя знаками после запятой } end.

Важно: в Паскале оператор возведения в степень не используется как ^ (это комментарий: ^ — указатель в старых диалектах). Чтобы получить 22^2, удобнее писать 2222 или использовать соответствующую функцию pow/power в зависимости от компилятора (но для целочисленного выражения 2222 проще и надёжнее).