[steam13]

всегда делал так)

Код:

var a,b,x,y,z,min:real;
begin
------- Тут считывайте как хотите ----------
min:=x+y;
a:=y+x;
b:=x+z;
if a<min  then min:=a;
if b<min then min:=b;
------------ выводим значение min-----------
end;