Задача

Задачі

Підпрограми

1)      Підпрограми - процедури.

У мові Паскаль розрізняють два види підпрограм: Підпрограми-процедури і підпрограми-функції.

Концепція структурного програмування поллягає в тому, що будь-яку складну чи громіздку задачу потрібно звести до послідовності простіших підзадач, записати підпрограми для їхнього розв’язування і створити головну програму, яка має складатися з викликів  цих процедур. Різновидом підпрограми  є процедура, де розв’язується допоміжна задача.

Procedure <Назва процедури>;

<Розділи описів і оголошень процедури>

{Оголошенні тут змінні називаються локальними}

begin

<Розділ команд процедур>

end;

Назву процедурі дає користувач. Процедур може бути декілька. Їх записують у розділі описів головної програми:

Program <Назва головної програми>;

<Розділ описів і оголошень>;

{Оголошені тут змінні називаються глобальними }

<Процедура 1>;

<Процедура 2>;

.............

begin

< Розділ команд, який містить

виклик процедури 1;

виклик процедури 2;>

.....

end.

Розділ команд головної програми складається в основному з викликів процедур. Виклик процедури – це команда, яка збігається з назвою процедури.

2) Демонстраційний приклад.

Дано сторони a, b прямокутника. Обчислити його  периметр і площу, використавши для цього процедуру.

Кнопка, що пригає

Мета роботи - створити програму-гру, виконує такі дії:

1. Після запуску програми у вікні зображується безладно стрибаюча кнопка.

2. Необхідно встигнути клацнути по ній.

3. Кнопка перестрибує з одного місця в інше за сигналом, отриманому від таймера.

4. Для виходу з програми необхідно натиснути мишею на закриває кнопці в рядку заголовка.

Опис плану розробки програми

1. Відкрити новий проект.

2. Розмістити на формі екземпляри компонентів: командна кнопка Button, таймер Timer.

 Таймер. Цей компонент служить для відліку інтервалів реального часу. Має обмеження - не може обробляти інтервали менше 55 мілісекунд.

Завдання: Звертати і розгортати вікно програми через встановлений інтервал

Application.Minimize - функція мінімізує ( згортає вікно )

     Application.ReStore - функція відновлює форму в попереднє положення.
Яких-небудь додаткових властивостей дані функції не мають. Просто записуємо у процедурі потрібну функцію , ставимо крапку з комою і компілюємо .
 Нам потрібно написати програму, яка б по тому встановлений проміжок часу згорталася і розгорталася .Використовуємо для даної задачі TTimer  і введемо додаткову змінну max типу boolean ( запишемо в private ) , як ознака розгорнутого вікна . Запускати наше вікно ми будемо по кнопці btnStart , а записувати затримку для таймера ставити в EditMs , припускаючи , що одиниця вимірювання мілісекунди .

Цикл "Доки". Команди While

1)      Цикл "Доки". Команди While

While

            умова do

begin

Тіло циклу

end;

Вказівка виконується таким чином: перевіряється виконання умови, записаної після слова WHILE (поки), і якщо ця умова виконується то виконується серія операторів (тіло циклу), після чого знову повертається до перевірки виконання вказаної умови (зустрівши слово END). Вказані дії виконуються доти, поки умова, яка перевіряється дає істино. Якщо умова не виконується (результат виконання умови є хибно), то тіло циклу пропускається і виконання вказівки повторення закінчується.

Приклад. Вивести таблицю чисел від 20 до 30, їхні квадрати та куби за допомогою команди while можна так:

Масиви

Скласти програму для визначення чи лежить точка (x3; у3), на прямий проходить через точки (x1, y1), С (х2; у2)}

 Знайти суму 30 дійсних чисел.

Скласти програму, яка кодувала б текст, переданий російськими літерами, за допомогою азбуки Морзе. Між сусідніми символами азбуки Морзе треба залишати по одному пробілу, а між сусідніми словами - додатково стільки прогалин, скільки їх було в переданому тексті.