Даны 3 числа найти сумму (k), a, b, c произведение (r) среднее арифметическое (n) блок схема, программа.

Var
a,b,c,K,R:integer;
N:real;
Begin
Readln(a,b,c)
K:=a+b+c;
N:=(a+b+c)/3;
R:=a*b*c;
writeln(K);
writeln(R);
writeln(N);
End.