3
Объяснение:
Посчитаем количество участников по регионам:
Башкирия - 500
Чувашия - 600
Удмуртия - 900
Всего 2000
Следовательно Удмуртия занимает чуть меньше половины.
Рассмотрим диаграммы:
В 1 и 2 диаграммах один из регионов занимает ровно половину диаграммы (зелёный сектор). Они нам не подходят, т.к. самый большой регион должен занимать чуть меньше половины.
В 4 диаграмме все регионы занимают равные сектора, что тоже не соответствует условию. Она тоже не подходит.
В 3 диаграмме все условия выполнены. Она подходит.
var
a:array[1..30] of integer;
i, k: integer;
s: real;
begin
s:=0;
k:=0;
for i:=1 to 30 do
readln(a[i]);
for i:=1 to 30 do
begin
if (not(a[i]mod 2=0)) then
s:=s+a[i];
inc(k);
end;
s:=s/k;
write(s:4:0);
end.