Урок 53-54. Алгоритми з розгалуженнями

Перегляньте презентацію та законспектуйте матеріал

Запам'ятайте

Практичне завдання

Увага! Під час роботи з комп'ютером дотримуйтеся правил безпеки та санітарно-гігієнічних норм.

Повторіть правила безпечної роботи за комп’ютером.

Завантажте і встановіть: Середовище програмування Лазарус (для тих, хто не завантажив)

Завдання. Складіть проєкт, у якому при переміщенні вказівника по кнопці вона переміщується на 20 пікселів униз. Якщо після переміщення вказівника кнопка зникає з вікна, то вона має з’явитися у верхній частині вікна.

• 1. Відкрийте вікно середовища Lazarus.

  2. Розмістіть на формі кнопку.

  3. Створіть процедуру – обробник події MouseMove для кнопки.

  4. Додайте до цієї процедури команду, щоб у результаті переміщення вказівника по кнопці вона переміщувалася на 20 пікселів униз: Button1.Top := Button1.Top + 20;

  5. Додайте до цієї процедури команду, щоб у випадку зникнення кнопки з вікна вона знову з’являлася біля верхньої межі вікна:
     if Button1.Top + Button1.Height > Form1.Height
     then Button1.Top := 0;

  6. Запустіть проєкт на виконання.

  7. Перемістить вказівник по кнопці та спостерігайте за переміщенням кнопки.

  8. Перемістить ще кілька разів вказівник по кнопці, поки вона не зникне з вікна і не з’явиться біля верхньої межі вікна.

  9. Закрийте вікно виконання проєкту.

  10. Закрийте вікно середовища Lazarus.

  11. Зніміть відео виконання проєкту та додайте його у розділі Ваші роботи на платформі Google ClassRoom.

Опрацюйте 

за підручником "Інформатика, 8 клас" (Й.Я. Ривкінд та їнші):

• Прочитайте та розберіть теоретичний матеріал пункту 6.8 (стор. 214-216).

• Дайте усні відповіді на питання 1-9 (стор. 222).

• Виконайте вправу 2 (стор. 223)

Перевірте свій рівень знань 

Скриншот результату тесту прикріпіть у розділі Ваші роботи на платформі Google ClassRoom: 

• Розгалуження (Pascal-Lazarus). Тест 33 (Інформатика 8 клас Ривкінд)