Головна Реєстрація Вхід RSS

Розробка проекту «Цикл з передумовою»

1. Запустіть програму Delphi.


2. Поставте на форму необхідні об'єкти.
   
   
3. Розмістіть їх за зразком.
   
4. Задайте їм відповідні властивості
   
5. Для кнопок Button1 і Button2 потрібно написати код програми.  Для цього потрібно двічі клацнути мишею по кнопці, відкриється вікно редактора коду i з’явиться заготовка процедури, де ми маємо між службовими словами begin (початок процедури) та end (кінець процедури) написати потрібний нам код. Для кнопки Button1 потрібно дописати між службовими словами procedure та begin опис змінної пам'яті.
   

   var - розділ опису змінної пам'яті;
   A, B - імена комірок пам'яті;
   integer - тип пам'яті (цілі числа від -2147483648 до 2147483647);
   := - оператор присвоєння;
   StrToInt - функція, яка перетворює рядок символів (string) у ціле число (integer);
   IntToStr - функція, яка перетворює ціле число (integer) у рядок символів (string).
   

   Якщо кількість повторень команд тіла циклу до початку виконання команди циклу невідома, потрібно використовувати команду циклу з передумовою.
   Загальний вигляд команди циклу з передумовою такий:
   while  <логічний вираз>  do
   begin
       <команди тіла циклу>
   end;
   (англ. while – поки). Якщо тіло циклу складається лише з однієї команди, операторні дужки begin і end можна не ставити.
   Виконується команда циклу з передумовою так:
   1. Обчислити значення логічного виразу.
   2. Якщо це значення true, то виконати команди тіла циклу і перейти до команди 1, а якщо false, то виконати команду, наступну за командою циклу.

   Команда повного розгалуження в Delphi має такий загальний вигляд:
   if <логічний вираз>
   then begin
       <послідовність команд 1>
   end
   else begin
       <послідовність команд 2>
   end;
   (англ. if – якщо, then – тоді, else – інакше)
   Виконання команди повного розгалуження відбувається так: обчислюється значення логічного виразу; якщо це значення true, то виконується послідовність команд 1 і після цього виконується команда, наступна за командою розгалуження; якщо це значення false, то виконується послідовність команд 2 і після цього виконується команда, наступна за командою розгалуження.
   Звертаємо вашу увагу:
   •   якщо після ключових слів then і else слідують тільки по одній команді, то операторні дужки begin і end можна не ставити;
   •   перед else ставити крапку з комою не можна.
   

   
   Перехід від форми до вікна редактора коду можна здійснити функціональною клавішею F12
6. Запустіть проект на виконання і проаналізуйте дію кнопок.
   
7. Збережіть проект: Save All.