Внести три числа, найти их сумму, произведение и среднее арифметическое. пример (используя переменные числа не трогать) 4 5 7 4+5+7=16 4*5*=140

Uses crt;
var
a,b,c: real;
begin
clrscr;
write ('a=');
readln (a);
write ('b=');
readln (b);
write ('c=');
readln (c);
writeln ('a+b+c=',a+b+c);
writeln ('a*b*c=',a*b*c);
writeln ('(a+b+c)/3=',(a+b+c)/3);
readln ();
end.