var a,b,c,d,s: real;
begin
read (a,b,c,d);
s: = a + b + c +d;
writeln (s: 0: 4);
end.
надеюсь мое объяснение вам . буду рад если вы отметите мое решение как лучшее
