Question

Ввести три числа, найти их сумму и произведение и среднее арифметическое

пример:
Введите три числа:
4 5 7
4+5+7=16
4*5*7=140
(4+5+7)/3=5.33

Answer 1

Program n_1;

Var a, b, c, S, n: Integer;

Var q:Real;

Begin

Writeln('' Введите первое число'');

Readln(a) ;

Writeln('' Введите второе число'');

Readln(b) ;

Writeln('' Введите третье число'');

Readln(c) ;

S:=a+b+c;

n:=a*b*c;

q:=S/3;

Writeln(S) ;

Writeln(n) ;

Writeln(q) ;


end.