Реализовать в программе меню выбора арифметических действий. В зависимости от варианта посчитать значение выражения Y:=X{+|-|*|/}A. X и A вводятся — Pascal(Паскаль)

program micro_calc;
var
operation:char;
x,y,z:real;
begin
write('X=');
readln(x);
write('Y=');
readln(y);
readln(operation);
case operation of
'+': z:=x+y;
'-': z:=x-y;
'*': z:=x*y;
'/': z:=x/y
end;
writeln('=',z)
end.