Помогите пожалуйста !! 9 класс, че то связанное с Паскалем

1. var a, b, c, s, p: integer; begin readln(a, b, c); s:=a+b+c; p:=a*b*c; writeln(a, '+', b, '+', c, '=', s); writeln(a, '*', b, '*', c, '=', p); end. 2.  var a, b, c, s, p: integer; sr: real; begin readln(a, b, c); s:=a+b+c; p:=a*b*c; sr := s/3; writeln(a, '+', b, '+', c, '=', s); writeln(a, '*', b, '*', c, '=', p); writeln('(', a, '+', b, '+', c, ')/3=', sr); end.