Page 76 - 33
P. 76

30 INPUT “   Нижня границя навантаження    ”, PMIN

                     35 INPUT “   Верхня границя навантаження    ”, PMAX


                     40 INPUT “   Крок прирощення навантаження ”, DP
                     45 INPUT “    a = ’’, А


                     50 INPUT “    x = ’’, X
                     55 I = 1


                     Організуємо  цикл,  але  слід  пам’ятати,  що  в  автоматичному  режимі  він

               працюватиме стосовно Р, а для лічильника “і” його треба організувати “вручну”.

               Крім  того,  слід  врахувати,  що  ідентифікатору,  який  знаходиться  в  команді

               відкриття циклу, не можна присвоювати індекс. У нашому випадку це  Р. Тому

               введемо додатковий ідентифікатор  G, який буде дублювати ідентифікатор  Р,

               але  буде  мати  індекси.  Відповідно  усередині  циклу  треба  передбачити

               присвоювання йому (G)  поточних значень Р і ввести  в формулу  замість Р.

                     60    FOR      P = PMIN   TO   PMAX    STEP   DP

                     65      G( I ) = P :    V ( I ) = A * G( I ) ^ X

                     70       N = I

                     75       I = I + 1

                     80     NEXT  P


                      Далі слід визначитись з форматом таблиці і організувати вивід “ шапки “

               таблиці та її вмісту. Вміст таблиці виводиться в циклі від 1 до N. Ось для чого

               було введено змінну N і оператор 70.

                       90 PRINT                  “       Результати розрахунку

                     95 PRINT                  “        =================

                     100 PRINT                “       N п/п    Р, кН    V, м/год

                     105 PRINT                ”       ==================

                     110 FOR     I = 1   TO  N

                     115 PRINT  USING “                     .   ”; I ,  G ( i ) ,  V ( i )

                     120 NEXT  i

                     125 PRINT               “        ==================



                                                              76
   71   72   73   74   75   76   77   78   79   80   81