СРОЧНО! Написать программный код для задачи:
 
  Ввести три числа, найти их сумму и произведение
     пример:
Введите три числа:
4 мая 7
4 + 5 + 7 = 16
4 * 5 * 7 = 140

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

uses crt;

var

a,b,c,sum,p:integer;

sr:real;

begin clrscr;

write('a='); read(a);

write('b='); read(b);

write('c='); read(c);

sum:=a+b+c;

writeln(a,'+',b,'+',c,'=',sum);

p:=a*b*c;

writeln(a,'*',b,'*',c,'=',p);

sr:=sum/3;

writeln('sredn./arifm.=',sr:2:3);

readkey;

end.