Page 53 - 4260
P. 53

функцію  дода    комплек  операндами                Comp1=6 +
           i*8 і Comp2=7 + i*11 функцію розподілу Op1 на нуль.
           1. Командою      File=>New     викликаємо     вікно   архів    й
              вибираємо в ньому Unit (модуль без форми). Одержуємо у
              в і к н і   Р е д а к т о р а   к о д у  с т о р і н к у   ш а б л о н у   м о д у л я   з   і м е н е м
              Unit1.
           2. У     р  е  д  а  к  т  о  р  і     к  о  д  у     п  е  р  е  т  я  г  у  є  м     к  о  д     м  о  д  у  л  я  .  С  е  к  ц  і  ї
              Initialization і Finalization не використовуємо.
           3. Збережемо модуль із іменем Complex.Pas.
           4. Компілюємо модуль.
           5. Командо  Файл       => Створити     => Додаток  створюємо
              проект  програми. Форма додатка наведена на рисунку 6.1.
























                           Рисунок 6.1. Форма  програми

                  Форма містить:
              §   М  і т к и  Label1…Label6 д л я   в і д о б р а ж е н н я   н а п и с і в , щ  о
                  пояснюють.
              §   Однорядкові  редактори      Edit1…Edit4   введення
                  значень змінних a, b, c, d.



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