Назва роботи: Програмування в Delphi. Розробка циклічних програм. Цикл з покрокової зміною аргументу
Предметна область: Інформатика, кібернетика та програмування
Опис: Навчитися складати і реалізовувати програми вирішення завдань з використанням оператора циклу з покрокової зміною аргументу FOR. Ця послідовність дій утворює тіло циклу. У тілі циклу використовується змінна яка при кожному повторенні тіла циклу змінюється і визначає число повторень циклу. Така змінна називається параметром циклу.
Розмір файлу: 5.46 MB
Роботу скачали: 20 чол.
Лабораторна робота №5
Основи об'єктно-орієнтованого програмування в візуальному середовищі програмування Delphi.
Тема: Програмування в Delphi. Розробка циклічних програм. Цикл з покрокової зміною аргументу.
Мета: Розширити навички роботи у візуальному середовищі програмування Delphi. Навчитися складати і реалізовувати програми вирішення завдань з використанням оператора циклу з покрокової зміною аргументу FOR.
цикл # 150; команда виконавцю програми (комп'ютера) багаторазово, але не до нескінченності, повторювати вказану послідовність команд
циклічна структура # 150; це алгоритм, в якому передбачено неоднозначних про кратне повторення однієї і тієї ж послідовності дій. Ця последов а ність дій утворює тіло циклу. У тілі циклу використовується змінна, яка при кожному повторенні тіла циклу змінюється і визначає число повтор е ний циклу. Така змінна називається параметром циклу.
Цикл з покрокової зміною аргументу # 150; FOR (ДЛЯ) використовується в тих сл у чаї, коли число повторень циклу заздалегідь відомо.
Цикл for є цикл з лічильником. Змінна, що утворює лічильник, зберігає кількість ітерацій, які будуть виконуватися в циклі. Повторення ітерацій відбувається до тих пір, поки значення лічильника не зміниться від початкової величини до величини заданої, званої кінцевої.
Цикли for діляться на два види: зі збільшенням лічильника і зменшенням лічильника.
Розглянемо приклад циклу for з збільшенням лічильника Синтаксис такого лічильника має наступний вигляд: for Лічильник Циклу. = Початкове Значення to Кінцеве значення do
begin
оператор1;
оператор2;
Для організації такого лічильника необхідно, щоб початкове значення було менше або дорівнює кінцевому значенню, інакше жодна ітерація циклу не виконається. Величина лічильника циклу збільшується на одиницю після кожного проходу циклу
- запустіть Delphi
- Помістіть на форму три компонента Edit. Edit1 використовуйте для введення початкового значення лічильника циклу, Edit2 використовуйте для введення кінцевого значення лічильника циклу. Результат проведених обчислень помістіть в компонент Edit3
- Помістіть на форму компонент Button1. Використовуючи властивість Caption, введіть заголовок "Рішення". Помістіть компонент Button2, використовуючи властивість Caption, введіть заголовок "Очистити". Клацання по кнопці Button2 буде обнуляти вміст компонента Edit3. Запишіть програмний код:
- procedure TForm1.Button1Click (Sender: TObject);
var
i: Integer;
X, Y: Integer;
begin
X: = StrToInt (Edit1.Text);
Y: = StrToInt (Edit2.Text);
for i: = X to Y do
X: = X + 1;
Edit3.Text: = IntToStr (X);
end;
procedure TForm1.Button2Click (Sender: TObject);
begin
Edit3.Text: = '';
end;
end.
Оператор for забезпечує виконання тіла циклу до тих пір, поки не будуть перебрані всі значення параметра циклу від початкового значення до кінцевого значення. Після кожного повтору значення параметра циклу збільшується на одиницю
Синтаксис циклу for зі зменшенням значення лічильника: for Лічильник Циклу. = Початкове Значення downto Кінцеве значення do
begin
Операто1;
оператор2;
Величина початкового значення має бути більше або дорівнює величині кінцевого значення, інакше не виконається ні одна ітерація циклу. Значення лічильника циклу зменшується на одиницю при кожному проході циклу.
Помістіть на форму компонент Edit1 і Button1. Запишіть програмний код для розрахунку деякого значення:
procedure TForm1.Button1Click (Sender: TObject);
var
I, Min: Integer;
begin
Min: = 25;
for I: = 10 downto 1 do
Min: = Min # 151; I;
Edit1.Text: = IntToStr (Min);
end;
end.
Цикл for починається зарезервованим словом for. За ним слідує оператор присвоювання, який ініціює величину лічильника циклу. Змінна в лівій частині оператора присвоювання # 151; лічильник циклу. Це може бути довільна змінна порядкового типу, зазвичай Integer. Праворуч від операції присвоювання # 151; вираз, що задає початкове значення лічильника циклу.
Мінлива лічильника циклу # 151; це звичайна змінна, яка може мати будь-яке ім'я. Єдине обмеження полягає в тому, що лічильник циклу повинен бути обов'язково оголошений, як і інші змінні, і оголошений локально # 151; в тій же області дії, що і цикл for.
Початкове значення, яке ви привласнюєте лічильнику, може бути будь-яким, якщо воно сумісне з типом змінної величини у вигляді константи. Замість явного завдання величини лічильника, можна застосовувати довільні вирази.
За инициализацией лічильника слід ключове слово to або downto. яке визначає тип циклу. зі зростаючим значенням лічильника або з убутним.
Далі слід кінцеве значення лічильника циклу, яке може бути задано явно або як змінна, або довільне вираження, сумісний з типом зі змінною лічильника циклу.
Після кінцевого значення лічильника циклу слід зарезервоване слово do. а потім тіло циклу. Якщо в циклі використовується більше одного оператора, то все тіло циклу полягає в блок begin # 151; end.
Порядок виконання роботи
- Завантажуємо середу програмування Delphi. Пуск Програми Borland Delphi Delphi 7.
- Завдання 1 Скласти блок-схему і написати програму знаходження суми ряду
- Складаємо блок-схему і програму рішення задачі
procedure TForm1.Button3Click (Sender: TObject);
- Що таке цикл?
- тіло циклу # 150; це?
- циклічна структура # 150; це?
- параметр циклу # 150; це?
- Коли використовується цикл з покрокової змінною аргументу?
- Чому дорівнює крок зміни циклу For?
- Які значення може приймати крок циклу FOR?
- За якою формулою визначається кількість повторень в циклі?
- Якого типу параметр циклу?
- Як виглядає конструкція оператора якщо необхідно виконати б про леї одного оператора?