Помогите пожалуйста!Программы в Паскале.
1)Напишите программу,которая находит сумму,произведение и среднее арифметическое трёх целых чисел,введенных с клавиатуры.Примеры:4+5+7=16;4*5*7=140;(4+5+7)/3=5.333.
2)Напишите программу,которая вводит радиус и вычисляет его площадь и длину окружности.Примеры:радиус 5;площ. и длин.окр. 78.540,31.416
3)Напишите программу,которая вводит два целых числа,а и b(а<b),и выводит через пробел 5 случайных целых чисел на отрезке[а,b].Примеры:входные дан.0 100
выходные дан.0 3 86 20 27

1)var a,b,c:integer;beginreadln(a,b,c);writeln(a,'+',b,'+',c,' = ',a+b+c);writeln(a,'*',b,'*',c,' = ',a*b*c);writeln('(',a,'+',b,'+',c,')/3 = ',(a+b+c)/3:5:3);end.Пример:4 5 74+5+7 = 164*5*7 = 140(4+5+7)/3 = 5.3332)var r:integer;beginreadln(r);writeln('S = ',pi*r*r:5:3);writeln('C = ',2*pi*r:5:3);end.Пример:5S = 78.540C = 31.4163)var a,b,i:integer;beginreadln(a,b);for i:=1 to 5 do write(random(b-a+1)+a,' ');end.Пример:0 1008 1 86 54 60