Дано целое число а.По данному методу составьте программу.Помогите пожалуйста

На Паскале:

var

z,x,y:real;

const

a=10;

begin

writeln('Введите значение x: ');

readln(x);

writeln('Введите значение y: ');

readln(y);

z:=(4*a+2*x)/y;

writeln('z = ',z);

end.

Программка на Кумире

алг сумма

нач

цел а

вещ x,y,z

a:=5

присвоение константе а данного значения напр 5

ввод (х)

ввод (у)

z:= (4*a+2*x)/y

вывод z

кон