const n=5; m=11;var a: array[1..n,1..m] of integer; i,j,s: integer;begin; s:=0; writeln ('Количество учеников по классам:'); for i:=1 to n do begin for j:=1 to m do begin a[i,j]:=random(25,30); write (a[i,j]:3); end; writeln; end; writeln; write ('Введите номер параллели: '); readln (j); for i:=1 to n do s:=s+a[i,j]; writeln ('В ',j,'-ой параллели всего ',s,' учеников');end.----------------Результат:---------------------Количество учеников по классам: 27 27 28 26 28 25 27 25 27 29 26 25 29 25 26 29 26 29 26 27 27 29 30 25 29 27 25 28 29 27 29 26 28 25 26 27 27 30 29 25 30 26 28 25 28 26 28 27 28 28 25 27 28 26 30Введите номер параллели: 5В 5-ой параллели всего 140 учеников