Question

Даны 3 числа 

Найти сумму (K), a, b, c

произведение (R)

среднее арифметическое (N)

блок схема, программа.

 

Answer 1

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.