информатика 9 класс
2) Даны 4 числа , если сумма первых двух больше или равна сумме вторых двух, то найти сумму и произведение этих чисел, иначе найти среднее арифметическое и увеличить каждое число на 3.

спасибо большое)))

var a,b,c,d:real;beginwrite('a, b, c, d: ');readln(a,b,c,d);if a+b>=c+d then writeln('Сумма = ',a+b+c+d,' Произведение = ',a*b*c*d) else begin      writeln('Среднее арифметическое = ',(a+b+c+d)/4);      a:=a+3; b:=b+3; c:=c+3; d:=d+3;      writeln('a = ',a,' b = ',b,' c = ',c,' d = ',d);      end;end.Пример:a, b, c, d: 5 2 7 3Среднее арифметическое = 4.25a = 8 b = 5 c = 10 d = 6