Задание:
Дано арифметическое выражение Y=(b – x) 3+b2. Найти значение Y при любых значениях b и х. Вывести на экран введенные b и х, и результат Y в одной строке Y=… b=… х=…
Решение:
program vir; var y,b,x: real; Begin writeln ('Введите переменные b и х для уравнения y=(b-x) 3+b2'); readln (b,x); y: =(b-x)*3+b*2; writeln ('Y=',y: 6:3,' b=',b: 6:3,' x=',6:3); readln; End.
Знаете другой ответ?