Page 14 - 33
P. 14

30 INPUT “Витрати бурового розчину, куб.м/с  “, Q
                      35 INPUT “Зовнішній і внутрішній діаметри, м  “, D1, D2



                      У  фрагменті  показано  ввід  одного  (Q)  і  двох  даних  (D1,  D2).  Слід


               пам’ятати, якщо однією командою вводиться декілька даних, то послідовність
               вводу  числових  значень  обов’язково  повинна  бути  такою  ж,  як  записано  у


               програмі.

                      Після  організації  вводу  усіх  даних,  потрібних  для  розрахунків,

               програмується  обчислювальний  блок.  При  цьому  слід  дотримуватися

               декількох  правил.  По-перше,  формула,  якою  б  вона  не  була,  записується

               рядком. Послідовність арифметичних дій визначається їх ієрархією: піднесення

               до  степеня  (добування  з-під  кореня),  множення  (ділення),  додавання

               (віднімання).  Якщо  треба  змінити  послідовність,  використовують  дужки

               (операції в дужках виконуються першими). Щодо дужок є правило: їх кількість

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

               однаковою. І ще: краще зайва пара дужок, ніж їх нестача.

                      В  нашій  задачі  обчислювальний  блок  містить  дві  формули,  за  якими
               послідовно визначаються площа перерізу і швидкість руху рідини.

                       40 F=PI*(D1^2-D2^2)/4

                      45 V=Q/F

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

               Тут слід вибрати форму, у якій ми хочемо бачити результати. Є різні варіанти.

                      Найпростіший виглядатиме так:


                        50 PRINT F, V

                      Наслідком  виконання  такої  команди  буде  два  числа  в  одному  рядку:

               перше – площа перерізу, друге – швидкість.

                      Другий варіант:


                      50 PRINT F
                        55 PRINT V



                                                              14
   9   10   11   12   13   14   15   16   17   18   19