y=x^3+x^2+286 Напишите программу в Паскале

program test ;varx,y:integer;beginwriteln (' Введите x ');readln (x);y:=x^3+x^2+286;writeln ('y равно');end.