даны числа a,b,c. найти сумму этих чисел произведение и среднее арифметическое значение.Проверка а=2,b=5,c=16,s=13,p=60,sr=20.
СРОЧНО
ПОЖАЛУЙСТА

var a,b,c,s,p,sr:integer;beginwriteln(‘vvedite a b c:’);readln(a,b,c);s:=a+b+c;p:=a*b*c;sr:=(a+b+c)/3;writeln(‘summa: ‘,s,’proizvedeniye: ‘,p,’sredneye arifmeticheskoye: ‘,sr);end.