Как написать программку в паскале для вычисления значений выражений. исходные данные

Значение выражений может быть неисчерпаемо. Но я напишу пример своего.
var a,b,c,x,z,y:integer;
begin
write( Введите любые 3 числа );
readln(x,z,y);
a:=x+y*y;
b:=z-x*y;
c:=z+y+x;
writeln(Значение a = ,a);
writeln(Значение b = ,b);
writeln(Значение c = ,c);
end.