Составить программку для вычисления значения функции y=2x-4/3x^2+11

program zz1;
var x:integer; // задаем переменную целого типа
y:real; // задаем переменную не целого типа для ответа
begin
write(введите заданное число х ); // вводим с клавиатуры начальное число х
read(x);
y:=2 * x - 4/3 * x * x + 11; // вычисляем результат по данному выражению
write( итог вычисления данного выражения = , y:5:2); // выводим ответ, 5 знаков для всего числа и два знака после точки
end.