const n=9;
var marks:array[1..n,1..2] of 2..5;
i,k:integer;
begin
writeln('Оценки студентов:');
for i:=1 to n do
begin
marks[i,1]:=random(4)+2;
marks[i,2]:=random(4)+2;
writeln(i,': ',marks[i,1]:3,marks[i,2]:3);
end;
k:=0;
for i:=1 to n do
if (marks[i,1]+marks[i,2])/2<3 then k:=k+1;
writeln('Количество студентов, имеющих средний балл < 3 = ',k);
end.
Пример:
Оценки студентов:
1: 5 4
2: 5 4
3: 4 3
4: 5 5
5: 2 2
6: 2 3
7: 5 5
8: 3 4
9: 2 2
Количество студентов, имеющих средний балл < 3 = 3
Я не совсем понял, но если смотреть со стороны логики, то норм
море
соре
суре
суше
сушя
суша
Берёт враг
он берёт 2 ты 1 =3
он 1 ты 2=3
вроде как-то так
Поищи в Викапедии там внизу.