ПОМАХИТЕ! Давайте начнем с прорисовки поля!

Поле будет состоять из 15 секций для того, чтобы мы могли следить за этапами забега.

Так как секции будут одинаковыми нам понадобится цикл for.

Каждой секции мы подпишем ее номер с команды t.write().

Достижения в области новых технологий, на которых основывается формирование информационного общества, во многом изменили характер политических процессов. По новому начинают осмысливаться понятия политической коммуникации и политического информационного пространства. Существенным трансформациям подвергается вся система государственнного управления, свидетельством чего стала активно обсуждаемая и постепенно внедряемая в практику многих стран проблема “Электронной-демократии”. Без информационного сопровождения функционирование современных демократических институтов может быть существенно затруднено, а обеспечение равного доступа к политическим сетям при определенных условиях может закреплению демократических стандартов и их развитию. При этом выясняется, что современные информационные технологии, по мере расширения их сферы применения в повседневной жизни общества, создают потенциальную возможность не только для углубления демократических процессов, но и тотального контроля за частной жизнью и манипулятивного воздействия на личность. В условиях существования открытых, легко доступных и легко наполняемых информационных сетей возникает проблема ограничения информации, считающейся социально и экономически опасной; проблема электронного распространения персональных данных, проблема информационного элитаризма, когда лишь часть населения получает доступ к новым технологиям и информационным ресурсам и в состоянии реализовать это преимущество; проблема информационного империализма, когда ту же проблему доступа к информации и управления ею большие страны используют против малых; проблема соблюдения авторских прав и прав производителей электронной информации. Особую проблему преставляет вопрос об информационно бедных странах. На втором Всемирном Саммите по информационному обществу /Тунис, 2005/ обсуждался в качестве одного из главных вопрос информационного неравенства стран и трансформация понятия экономически бедных стран в информационно бедных. В информационном обществе возникают принципиально новые информационные угрозы для личности, общества и государства. Отсюда - жизненнно важное значение междисциплинарных и, в первую очередь, социально-политических исследований проблем информационной безопасности, киберпреступлений, информационного противоборства и информационных войн. И это - лишь часть принципиально новых социально-политических проблем, возникающих при определении национальной стратегии информационной политики государства в контексте происходящих изменений. Таким образом, актуальность исследований информационного общества связана с необходимостью теоретического осознания и эффективного политического управления процессами, возникающими под воздействием информационно-коммуникативных технологий.В свете становления информационного общества происходят глобальные изменения, которые трансформируют всю социальную структуру, оказывая воздействие на политические, экономические, культурные и социальные процессы. Глубоко изменяется социально-экономическая структура общества.

Var a:array[1..100] of integer;
i,p,n:integer;
begin
writeln('введите количество элементов');  read(n);
p:=1;
randomize; {случайные числа}
for i:=1 to n do {от 1 до n элемента}
begin
a[i]:=random(100)-50; {случайные числа, можешь указать любые значения}
if a[i] mod 4=0 then{если элемент массива делится на 4 с остатком 0}
p:=p*a[i]; {умножаем текущее p на этот элемент}
end;
writeln(p); {выводим произведение}
end.

В случае,если в массиве будет число 0, оно будет делится на 4 без остатка, поэтому произведение будет 0. Если это не нужно, то строку if a[i] mod 4=0 then
замени на if (a[i]<>0) and (a[i] mod 4=0) then Тогда 0 учитываться не будет.