Составить программу, вычисляющую значение у, если: У= {х( в 3-е) - 2х(вот 2 ой)+ х, если >1 { 2х- 5, если х< 1
Var x:real; begin Read(x); if (x > 1) then Writeln('y = ', x*x*x - 2*x*x + x); if (x < 1) then Writeln('y = ', 2*x - 5); end.