Kraz, прошу помочь, если возможно до пятьницы... Опции

[orgx100]

Здраствуйте дорогие читатели, возникла каверзная ситуация...вообщем к главному..
Вот нада написать программу, гонки с препятсвиями, возникла ситуация с созданием двумерного масива для создания поля препятсвий, сам накидал чуток но чет аж паскаль начал глючить вобщем вот она сама  Оргазм_мозга_34.txt ( 2.65 килобайт ) Кол-во скачиваний: 521
, кто может помагите в течения 1-2 дня, ну или просто на будущие подскажите, и не судите строго по написанию, тока начал учиться ....

[volvo]

Причина отказа программы работать - банальна, обычный Range Check Error - вылет за границу. В данном случае - за границу типа.

Проблема - вот в этом куске кода:

 s1:=0;     {Зануление с1}
 xa1:=50; 
 ga1:=0; {Зануление га1}
 for j:=1 to f do  {Начало двумерного массива, столбец }
 begin
   ga1:=ga1+1;  {накрутка га1 }
   xa1:=xa1*ga1;  { задание дистанции между столбцами массива,тоесть колонны выхода колец.}

Вот именно в последней строке и происходит вылет. Потому что переменная xa1 описана, как Integer - стало быть может хранить значения от -32768 до 32767, а при J = 6 ты пытаешься запихать туда 6000*6=36000.