Объяснение:
program adf;
var x,y,z,d,j: integer;
begin
read(x,y,z,d);
j:=(x+y+z+d);
write ('x+y+z+d=',j);
end.
