1-а
2-b
3-a,c
4-c
5-b или c
6-c
7-a
8-b или c
9 не видно
4*sqr(a)*sqr(b)*b*(sqr(a)+4*a*b+4*sqr(b))
или
4*sqr(a)*sqr(b)*b*sqr(a+2*b) - это если учесть, что а²+4ab+4b² = (a+2b)²
Program n1;
const n=10;
var
a : array[1..n] of integer;
a1: array[1..n] of integer;
s,s1,i: integer;
begin
s := 0;
s1:=0;
for i := 1 to n do
begin
write('введите рост ', i,' ученика: ' ); readln(a[i]);
s := s + a[i];
write('введите вес ',i,' ученика: ');
readln(a1[i]);
s1:=s1+a1[i];
end;
writeln('средний рост: ',s/n);
writeln('средний вес: ',s1/n);
end.