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

Значение выражений может быть бесконечно. Но я напишу пример своего.

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.