Исправьте ошибки
mas1=array[1..10] of integer;
mas2=array[1..20] of integer;
Var
a,b:mas1;
c:mas2;
i:integer;
Begin
randomize;
writeln('Массив A');
for i:=1 to 10 do
begin
a[i]:=random(51);
write(a[i]:5);
end;
writeln('Массив B');
for i:=1 to 10 do
begin
b[i]:=random(151)-70;
write(b[i]:5);
end;
for i:=1 to 20 do
if i mod 2=0 then
c[i]:=b[i div 2]
else
c[i]:=a[i div 2];
writeln('Массив C');
for i:=1 to 20 do
write(c[i]:6)
end.
n,i,p,i1,i2: integer;
begin
write('n = ');
readln(n);
SetLength(a,n);
Randomize;
a[0]:=random(50)+100;
write(a[0]:4);
for i:=1 to n-1 do
begin
a[i]:=a[i-1]-random(11);
write(a[i]:4);
end;
writeln;
p:=a[0]-a[n-1];
writeln('p = ',p);
i1:=0; i2:=n-1;
repeat
i:=(i1+i2) div 2;
if a[i]>p then i1:=i1+1;
if a[i]<p then i2:=i2-1;
until (a[i]=p)or(i1>=i2);
if a[i]=p
then writeln('i = ',i)
else writeln('Искомого элемента нет');
end.
Пример:
n = 20
142 139 135 129 120 120 120 113 107 106 104 99 89 88 81 72 71 70 60 54
p = 88
i = 13
Существовало две игры. Одна проигрывалась в жизни. Другая проживалась в игре. Естественно, однажды эти миры столкнулись, равно как и Два Джона.
Это случилось в апреле 2000 года в деловом районе Далласа{1}[1]. Поводом послужили 100 тыс. долларов, стоявшие на кону, – главный приз в чемпионате по компьютерной игре Quake III Arena, который проводила Cyberathlete Professional League, организация, надеявшаяся когда-нибудь стать своего рода Национальной футбольной лигой в кибер Все было устроено по принципу BYOC[2]. В подвале отеля Hyatt сотни компьютеров объединили в сеть: участникам предстояло провести за ними семьдесят два часа без перерыва. На огромном экране, на который выводилось то, что отображалось на мониторах игроков, проносились ракеты. Пыхающие сигарами космические десантники, грозные широкоплечие воины, забрызганные кровью клоуны-маньяки – все они гонялись друг за другом с ракетными установками и плазменными пушками с одной целью: убить как можно больше персонажей.
Участники соревнования были матерыми геймерами, проделавшими огромный путь. Больше тысячи человек приехали на машинах из далекой Флориды и даже Финляндии, привезя с собой собственные монитор, клавиатуру и мышку. Они бились до тех пор, пока не начинали падать в обморок или сползать под стол, чтобы поспать, подложив под голову коробку из-под пиццы. Одна парочка гордо заявилась с новорожденным младенцем, одетым в самодельную пижаму с надписью Quake. Двое парней выбрили на голове логотип Quake в виде когтя; их подружки кружили по конференц-залу с бритвами наготове, предлагая всем желающим сделать культовую прическу.
Подобные страсти было отнюдь не редкостью для Далласа – столицы ультражестких игр типа Quake или DOOM. Игры, в которых, как в пейнтболе, играешь от первого лица, положили начало новому жанру, известному как first person shooter[3]. Они входят в число самых успешно продаваемых франшиз в этой индустрии, оцениваемой в 10,8 миллиона долларов, и заставляют американцев тратить больше денег на видеоигры, нежели на билеты в кино{2}. В свое время они развитию вычислительной техники, расширив границы 3D-графики и задав стандарт онлайн-игр и сообществ. Вместе с тем из-за них так сильно накалилась социально-политическая обстановка, что их даже запретили в ряде стран, а в США признали, что именно они спровоцировали череду убийств, совершенных в 1999 году двумя фанатами в Колумбийском университете.
В результате сформировалось уникальное неформальное сообщество, высокотехнологичная Мекка, где совершенно безумных одаренных молодых геймеров награждали крупными призами. Самыми одаренными и безумными среди них оказались соавторы DOOM и Quake Джон Кармак и Джон Ромеро, или, как их все называли, Два Джона.
Для нового поколения Кармак и Ромеро стали олицетворением «американской мечты»: оба – профессионалы, сделавшие себя сами и превратившие личное увлечение в большой бизнес, новую форму искусства, культурный феномен. История их успеха сделала их самыми необычными антигероями как по мнению Fortune 500, так и по мнению компьютерных хакеров; их называли Ленноном и Маккартни видеоигр (хотя более лестным для них было бы, вероятно, сравнение с Metallica). Оба Джона оставили свои неблагополучные семьи, чтобы создать одни из самых значимых компьютерных игр в истории. Но так вышло, что они же стали причиной, по которой их пути разошлись. И вот теперь, спустя годы после разрыва, Кармаку и Ромеро предстояло вместе выйти к своим фанатам.
Они согласились рассказать о своих последних проектах: детище Кармака Quake Arena III, разработанном в компании id Software, которую они основали сообща, и долгожданной эпической игре Daikatana авторства Ромеро, появившейся на свет в его новом стартапе Ion Storm. Эти игры объединяли полярные различия, в свое время сплотившие Двух Джонов в столь динамичный дуэт, а ныне превратившие их в, казалось, абсолютно непримиримых соперников. Их отношения стали предметом изучения человеческой алхимии.
29-летний Кармак, программист-филантроп, вел монашеский образ жизни и в свободное время собирал мощные ракеты (по мнению Билла Гейтса, он входил в шорт-лист гениев); его игра, равно как и вся жизнь, сводилась в своем устройстве к элегантной продуманности компьютерного кода. 32-летний Ромеро – дерзкий дизайнер, чей имидж плохого парня превратил его в рок-звезду индустрии, – мог поставить на кон все, включая собственную репутацию, чтобы реализовать самые смелые проекты. Как сказал Кармак после их разрыва: «Ромеро нужна целая империя, я же всего лишь хочу писать хорошие программы»{3}.