2.5.5 Описание входных данных

В качестве входных данных используется файл расширения *.xls. Структура входного файла построена следующим образом:

• в строках первого столбца хранятся наименования параметров свойств скважин;

• после третьего столбца включительно хранятся данные, которые соответствуют скважине с определенным номером.

Пример хранения исходных данных представлен на рисунке 2.10

2.10 Структура исходных данных

Заключение

В результате прохождения практики в научно-исследовательском отделе бурения научно-исследовательской лаборатории строительства скважин в сложных горно-геологических условиях ТО «СургутНИПИнефть» ОАО «Сургутнефтегаз» мною самостоятельно был разработан программный комплекс для дистанционного прогнозирования пластового давления и была разработана программа для расчета прочности цементного камня и величины создаваемой нагрузки пластовым давлением. Данные программы в купе позволяют:

• оперативно прогнозировать величину пластового давления в кровле баженовской свиты;

• определять оптимальную плотность тампонажного и бурового растворов.

В ходе работы было изучено:

• новые математические методы решения задач;

• структуры и применение геофизических данных;

В результате все поставленные задачи были решены, а цели достигнуты.

Список литературы

1. Хуббатов А.А., Шарафутдинов З.З., Гайдаров М.М. Строительство нефтяных и газовых скважин на суше и на море . №7. 2011. -С.37-38.

2. Джабаров К.А., Тобатаев М.Г. Определение допустимых параметров обсадных колонн под давлением в соответствие с прочностью цементного камня. // Бурение. Отечественный опыт. №5. 1986. -С.14-18.

3. Свалов А.М., Хавкин А.Я. Оценка напряжений в цементном камне и горной породе при изменении гидродинамического давления в скважине. // Разработка нефтяных месторождений. №9. 2010. -С.27-31.

4. «СургутНИПИнефть», В.Д.Горгоц, «Временная методика оценки проектных решений» Тюмень. 2010 - С117.

Приложение №1

Функция расчета угла между реперами А и Б

function Angle (x1,x2,y1,y2:Double):Double;

var tmp:Double;

begin

tmp:=ArcTan2(y1-y2,x1-x2);

Result:=(tmp);

end;

//Находим максимальное значение ГК

for i:=0 to table1.RowCount-1 do

if (masX[i]>max) then begin max:=masX[i];tmp:=i; end;

mem1.Lines[0]:=FloatToStr(masY[tmp])+' | '+FloatToStr(max)+' – это кровля';

//Находим репер А

i:=tmp;

tmp_max:=0;

tm:=0;

while(masY[tmp]>(masY[i]-26))do

begin

Dec(tmp);

if ((masX[tmp]>masX[tmp-1]) and (masX[tmp]>masX[tmp+1]) and ((Abs(masX[tmp]-masX[tmp-1])>0.3)and(Abs(masX[tmp]-masX[tmp+1])>0.3)))then

if (masX[tmp]>tmp_max) then

begin

tmp_max:=masX[tmp];

tm:=tmp;

end;

end;

mem1.Lines[1]:=FloatToStr(masY[tm])+' | '+FloatToStr(masX[tm])+' – репер А';

x1:=masX[tm];

Продолжение приложения №1

y1:=masY[tm];

TFastLineSeries2.AddXY(masX[tm],masY[tm],'',clBlue);

TPointSeries1.AddXY(masX[tm],masY[tm],'',clBlue);

tmp_i:= tm;

//Находим репер Б

i:= tm;

while(masY[tm]>(masY[i]-20)) do

begin

Dec(tm);

if((masX[tm]<min) and (masX[tm]>0) and (tm>=0)) then begin min:=masX[tm]; j:= tm; end;

end;

mem1.Lines[2]:=FloatToStr(masY[j])+' | '+FloatToStr(masX[j])+' – репер Б';

x2:=masX[j];

y2:=masY[j];

TFastLineSeries2.AddXY(masX[j],masY[j],'',clBlue);

Series1.AddXY(masX[j],masY[j],'',clBlue);

TFastLineSeries2.AddXY(masX[j],masY[tmp_i],'',clBlue);

TFastLineSeries2.AddXY(masX[tmp_i],masY[tmp_i],'',clBlue);

//расчет и вывод угла

global_angle:= Angle (x1,x2,y1,y2) * (180 / pi);

mem1.Lines[3]:=FloatToStrF((Angle (x1,x2,y1,y2) * (180 / pi)),ffFixed,4,2)+' - угол';