Page 53 - 4788
P. 53

АРИФМЕТИЧНІ ВИРАЗИ

                                  Арифметичні вирази – це числа, змінні, функції з'єднані
                            між  собою  знаками  арифметичних  операцій  та  (при
                            необхідності)       круглими        дужками.        Результатом
                            арифметичного виразу є число. Всі операції з арифметичними
                            виразами  виконуються  зліва  направо  з  врахуванням
                            пріоритету операцій та круглих дужок.
                                  Встановлено наступний пріоритет операцій:
                                 1.    вираз в дужках ( );
                                 2.    піднесення до степеню (^);
                                 3.    присвоєння числу від'ємних значень;
                                 4.    множення та ділення (*, / );
                                 5.    ціле від ділення ( \ );
                                 6.    залишок від ділення (Mod);
                                 7.    додавання та віднімання (+,-).


                                  Приклад.  Процедура  з  використанням  операторів
                            описання, вводу, виводу та присвоювання. Обчислити вираз
                                      2        2
                                  Y=x +sinz+tg (z+x), де x=3.4; z=5.6 .
                                  1. Відкрити нову форму Visual Basic (рис. 2.2)
                                  2.  На  панелі  інструментів  Стандартная  натиснути
                            кнопку Исследователь Программы.
                                  3. У вікні Программы – Проект 1 (рис. 2.2) натиснути
                            кнопку Просмотреть код.
                                  4. Відкриється вікно Проект1 – Форма1 (Код).
                                  Після  вибору  ім'я  об’єкта  Form  та  ім'я  події  Load,
                            відкриється вікно коду процедури Form_ Load()
                                  5.   Тіло   процедури     (програми)     записуємо     між
                            операторами Private Sub Form_Load() та End Sub.
                                  Private Sub Form1_Load()
                                  Dim x!, y!, z!
                                  x=Val(InputBox(“x=”))
                                  z=Val(InputBox(“x=”))
                                  y=x^2+sin(z)+tan(z+x)^2
                                  Print x, y, z
                                  End sub




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