1) вводится три числа. найти среднее арифметическое и вывести его. 2) вводится три числа. найти сумму четных чисел. 3) вводится три числа, найти среднее арифметическое число максимального, минимального элемента. ( оформить все правильно, со знаками, точками с запятой и т.д)

1) var a, b, c: integer; sr: real; begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); sr: =(a+b+c)/3; writeln('среднее арифметическое = ',sr); end. пример: a = 5 b = 2 c = 8 среднее арифметическое = 5 2) var a, b, c, s : integer;   begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); s: =0; if a mod 2 = 0 then s: =s+a; if b mod 2 = 0 then s: =s+b; if c mod 2 = 0 then s: =s+c; writeln('сумма четных чисел = ',s); end. пример: a = 8 b = 5 c = 2 сумма четных чисел = 10 3) var a, b, c, max, min : integer;   begin write('a = '); readln(a); write('b = '); readln(b); write('c = '); readln(c); if a> b then max: =a else max: =b; if c> max then max: =c; if a< b then min: =a else min: =b; if c< min then min: =c; writeln('max = ',max,' min = ',min,'   среднее = ',(max+min)/2); end. пример: a = 5 b = 2 c = 8 max = 8 min = 2   среднее = 5

АААААААААААААААААА

Объяснение:наверное так