Записать на языке паскаля следующее выражение: y=5x^2+10x+2. Найти его значение при x=1.
Var y,x:double; BEGIN x:=1; y:=5*sqr(x)+10*x+2; WriteLn(y); Readln(); END.