Page 52 - 33
P. 52

де  p   - максимально допустиме перевищення тиску (1.5, 2.5 або 3.5 МПа

                            залежно від глибини).

                       Для  впевненості  в  правильності  розрахунків  доречно  передбачити  при

               виводі  результатів,  крім  значень  густини,  умови,  за  якими  вони  розраховані.

               Алгоритм зображено на рисунку 3.7.

                                                 Список ідентифікаторів

                        g -  прискорення вільного падіння                          - G

                  1E06 -  мільйон (для переводу Па в МПа і навпаки)  - M

                       H -  глибина свердловини                                         - H

                     p пл -  пластовий тиск                                                   - PL

               K 1, K 2 -  коефіцієнти перевищення тиску                       - K1, K2

                    [Δp]  -  максимально допустиме перевищення тиску                - DPD

                    ρ 1, ρ 2 -  мінімальна і максимальна густина бурового розчину - R1, R2

                   Z 1, Z 2 -  номери варіантів розрахунку                                          - Z1, Z2

                       Переходимо  до  складання  програми.  Враховуючи  відносно  велику

               кількість текстових фрагментів, скористаємось символьним масивом. Оскільки

               в тексті програми символьні змінні вже повинні бути з відповідними індексами,

               доцільно  складання  програми  почати  з  формування  символьного  масиву,

               взявши для його початку такий номер рядка, який би дозволив розмістити до

               нього всю основну програму. Хай це буде 200. Тоді підпрограма з символьним

               масивом виглядатиме так




                       200 A$(2)=”                       Вхідні дані  ”
                       202 A$(3)=”Глибина свердловини, м  ”


                       204 A$(4)=”Пластовий тиск, МПа       ”
                       206 A$(6)=”                      Результати розрахунку  ”


                       208 A$(7)=”         Мінімальна густина, кг/м       3               ”
                                                                            3
                       210 A$(8)=”         Максимальна густина, кг/м       “

                       212 A$(10)=”Примітка. Розрахунок виконано за умов:      ”

                       214 A$(11)=”мінімальний коефіцієнт перевищення тиску  ”


                                                              52
   47   48   49   50   51   52   53   54   55   56   57