Автор |
Текст |
beckman
#30
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Чт Янв 31, 2013 12:04 pm
|
Anecamateur писал(а): | ну что ж вы наделали? | Не думаю, что этот паскаль ей где-то в жизни нужен будет, сдаст и забудет. |
![](/templates/fs2/images/spacer.gif) |
beckman
#31
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Чт Янв 31, 2013 12:00 pm
|
В общем надо валить из этой темы, одни звездоболы, покедова. |
![](/templates/fs2/images/spacer.gif) |
beckman
#32
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Чт Янв 31, 2013 11:45 am
|
tRoPi_caNO писал(а): | мне не очень по душе мерится достижениями
играешь так, играй - это не есть цель |
tRoPi_caNO писал(а): | стата ни о чем, вообще |
Ты за своими словами следишь, вообще? |
![](/templates/fs2/images/spacer.gif) |
beckman
#33
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Чт Янв 31, 2013 11:26 am
|
tRoPi_caNO писал(а): | стата ни о чем, вообще | Ты свои 55% не считай за стату, красавица, ты в кустах стоять могла, пока тиммейты набивали тебе победы. У тебя про КПД спрашивали - где он? |
![](/templates/fs2/images/spacer.gif) |
beckman
#34
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Чт Янв 31, 2013 1:57 am
|
Пипелац писал(а): | В чём его паразитизм?
Это нормальный ход для владельца игры по привлечению клиентов. | Он владелец не игры, а аккаунта в ней. И пришёл он к нам с рассказами о том, какая это хорошая игра, скрывая свои истинные корыстные побуждения. Именно это меня и задело.
Пипелац писал(а): | И что я там должен увидеть? | Ты там увидишь двух премиумных типов и завернешь обратно все свои слова насчёт нищебродства. ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
beckman
#35
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Чт Янв 31, 2013 1:51 am
|
При желании могу завтра прокомментировать всю эту писанину, т.к. половина хорошей программы - это грамотные комментарии к ней. |
![](/templates/fs2/images/spacer.gif) |
beckman
#36
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Чт Янв 31, 2013 1:49 am
|
Готово (прошу прощения за мой инглиш, не стал кириллицу применять):
[code:1:55c18d6ce3]Uses Crt;
Const
Rows=10;
Cols=25;
Filename='cinema.dat';
Type
TypeZal=array[1..Rows,1..Cols] of Byte;
Var
z:TypeZal;
Procedure ShowZal;
Var
i,j:Byte;
Begin
TextBackground(Black);
ClrScr;
Write(' ');
For j:=1 to Cols do Write(j:2,' '); WriteLn;
For i:=1 to Rows do
Begin
Write(i:2,' ');
Fo ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
beckman
#37
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Чт Янв 31, 2013 12:27 am
|
О, щас качну паскаль с этой сцылки и тряхну стариной, это же как на велосипеде ездить :) |
![](/templates/fs2/images/spacer.gif) |
beckman
#38
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Чт Янв 31, 2013 12:18 am
|
Элементарно, Ватсон! Не нужно мудрить, вот моё предложение:
Код: | var zal=array[1..20,1..30] of byte; {20 рядов по 30 мест в каждом} |
Этот массив содержит образ всего зала в виде ряда значений, соответствующих состоянию каждого места. Например, 0 - место свободно (при создании массива весь зал будет пустой), 1 - место продано, 2 - место забронировано.
Для вывода состояния зала (отображение квадратов) на экран нужно, перебирая все ряды и мест ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
beckman
#39
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Ср Янв 30, 2013 11:40 pm
|
TmplR писал(а): | А как кстате посмотреть гараж? | Ну тут я оговорился, гараж никак, вроде бы, не посмотришь, но из игры можно посмотреть статистику игры на танках и будет видно, какие танки есть. В браузере можно посмотреть статистику по танкам на оленеметре или бронесайте. |
![](/templates/fs2/images/spacer.gif) |
beckman
#40
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Ср Янв 30, 2013 11:14 pm
|
Пипелац писал(а): | ну реферал и реферал, тебе-то что с того? жаба давит что ему что-то за тебя дадут? | Это ход паразита, которых я терпеть не могу. Тем более прикрытый откровенной ложью, смотрите какая классная игра-ля-ля-ля. Гнать таких ссаными тряпками.
Пипелац писал(а): | Жаба давит закинуть деньжат что бы быть наравне со 'всякими школьниками' и получать удовольствие? | Мой ник в WoT - beckman, иди, сходи, посмотри мой гараж и прекрати дела ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
beckman
#41
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Вт Янв 29, 2013 11:50 pm
|
Ха-ха-ха, нифига помощничков набежало, выкладывайте в тему задание :) |
![](/templates/fs2/images/spacer.gif) |
beckman
#42
|
Раздел: Нужна помощь Тема: Turbo Pascal Help
/ Вт Янв 29, 2013 11:49 pm
|
Тоже могу чем-нибудь помочь. |
![](/templates/fs2/images/spacer.gif) |
beckman
#43
|
Раздел: Компьютерные игры Тема: Warface или новый Рекордсмен Онлайн индустрии
/ Вт Янв 29, 2013 11:48 pm
|
LightSS писал(а): | За реферал я не получу абсолютно ничего, а вот, если кто-то по ней начнёт играть, получить солидный бонус в виде Вип-ускорителя. (Премиум аккаунта) | Ты кому сказку рассказываешь, бабуля? Смотрим здесь и что же мы видим?
"В Warface действует программа приглашений (рефералов), используя которую, вы можете получать игровые бонусы и элитное снаряжени ... ..... .... ... .. . |
![](/templates/fs2/images/spacer.gif) |
beckman
#44
|
Раздел: Интернет-провайдеры, телерадиовещание Тема: Оператор сотовой связи Билайн в Омске
/ Вт Янв 29, 2013 2:43 am
|
Билайн-Омск писал(а): | iXBT_man писал(а): | Ок, ну хотя бы скажите, что изменится после модернизации сети? |
Улучшится скорость мобильного Интернета, будет устранена проблема с отсутствием сигнала вызова, повысится стабильность и качество голосового соединения. | БЛДЖАДЖ, да я чуть телефон не продал из-за этих глюков! |
![](/templates/fs2/images/spacer.gif) |
|