Даны 3 числа
Найти сумму (K), a, b, c
произведение (R)
среднее арифметическое (N)
блок схема, программа.
Ответы
Ответ дал:
0
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.
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.
Вас заинтересует
6 лет назад
6 лет назад
9 лет назад
9 лет назад