Напишите программу для вычисления значения арифметических выражений: a=5*2x-z/3+y2(y во второй степение)

var a, x, z, y: Integer;
begin
write('Введите число x: ');
read(x);
writeln('Введите число z: ');
read(z);
writeln('Введите число y: ');
read(y);
writeln('a = ',5*2*x-z/3+(y*y));
end.