Задача в ABCPascal: даны 4 числа a, b, c, d найти их сумму в результате вывести четыре...

Question

Задача в ABCPascal: даны 4 числа a, b, c, d найти их сумму в результате вывести четыре знака после запятой

Answer 1

Var   a,b,c,d:real;
begin
readln(a);
readln(b);
readln(c);
readln(d);
writeln(round((a+b+c+d)*10000)/10000);
end.