Page 39 - 4450
P. 39

Арифметичні вирази

                                  Арифметичні вирази – це числа, змінні, функції з'єднані
                            між  собою  знаками  арифметичних  операцій  та  (при
                            необхідності)       круглими        дужками.        Результатом
                            арифметичного виразу є число. Всі операції з арифметичними
                            виразами  виконуються  зліва  направо  з  врахуванням
                            пріоритету операцій та круглих дужок.
                                  Встановлено такий пріоритет операцій:
                                 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




                                                           37
   34   35   36   37   38   39   40   41   42   43   44