Тема уроку: Цикл з передумовою.

Тема уроку: Цикл з передумовою.

Мета уроку: сформувати уявлення про синтаксис і семантику циклу з передумовою; сформувати вміння складати алгоритми з повтореннями для розв'язування задач;  розвивати логічне мислення та креативність; виховувати інформаційну культуру, дбайливе ставлення до комп’ютерної техніки.

ОЧІКУВАНІ РЕЗУЛЬТАТИ:

Знати: алгоритм роботи в середовищі програмування

Вміти: користуватися послугами середовища програмування

Обладнання:  підручник, картки для самостійної та практичної роботи

Тип уроку: комбінований

ХІД УРОКУ

І. Організаційна частина.

• привітання, перевірка присутніх, перевірка готовності учнів до уроку

ІІ. Актуалізація опорних знань учнів

Вправа «Лови помилку»

Знайдіть помилки в наведених фрагментах програми:

begin
k := 0;
Repeat
k := k + 2;
Label1.Caption := IntToStr(k);
Until k > 10;
end;

 

ІІІ. Повідомлення теми, мети і завдань уроку. Мотивація учіння школярів.

Під час розв'язування багатьох задач обчислювальний процес має циклічний характер, тобто частина операторів багаторазово виконується при різних значеннях змінних. Для організації повторення дій (циклів) під час запису алгоритмів мовою Lasurus використовуються три різновиди операторів циклу з параметром, з передумовою і з післяумовою.

На уроці ми повторимо синтаксис і правила виконання оператору циклу з передумовою.

ІV. Сприймання і усвідомлення учнями нового матеріалу.

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

Для організації повторення дій (циклів) при записі алгоритмів мовою Lazarus використовують три різновиди операторів циклу:

• з параметром
• з передумовою
• з післяумовою

Команда циклу з лічильником (параметром). Її доцільно використовувати в тих випадках, коли кількість повторень команд тіла циклу відома ще до початку виконання команди циклу. Загальний вигляд цієї команди такий:

for <ім'я змінної> := <вираз1> to

<вираз2> do

begin

 <команди тіла циклу>

end;

Існує різновид команди циклу з лічильником, у якому лічильник не збільшується на 1, а зменшується на 1:

 For <ім'я змінно» := <вираз1> downto <вираз2> do

begin

 <команди тіла циклу>

end;

Цей цикл продовжує виконуватися, якщо значення лічильника циклу більше або дорівнює (не менше) значенню вираз2.

 

Повторення (цикл) — це алгоритмічна структура, за допомогою якої та сама послідовність дій виконується кілька разів.

Для запису алгоритмів із повторенням (циклів) мовою Object Pascal використовують три види операторів циклу: з параметром, з передумовою і з післяумовою.

Серію команд, що повторюється під час виконання циклу, називають тілом циклу.

Кожне виконання тіла циклу називають ітерацією.

Цикл із параметром (лічильником) використовують у випадках, коли відома кількість повторень циклу. Оператор For забезпечує повторення команд, кероване параметром циклу.

 

https://learningapps.org/watch?v=p8dfyiu4n17

https://learningapps.org/watch?v=przsi5a9a18

https://learningapps.org/watch?v=p7nd7qsk519

V. Осмислення, узагальнення, систематизація знань.

1.   Практична робота на ПК.

Робота з картками

Розв’яжіть задачу та запишіть програмний код, відповідно до форми

 

Коли Коля прийшов на день народження до свого друга Толі, він разом з подарунком важив 26,1 кг (K1). На дні народження Коля з'їв A цукерок по 0,01 кг кожна, B яблук по 0,1 кг, C бутербродів з 0,11 кг і один торт вагою 2,5 кг. Скільки важив Коля (K2), коли йшов з дня народження Толі, якщо відомо, що свій подарунок він забрав з собою?

 

 

 

 

Завдання 1. Повторення.

Оператор циклу Repeat використовують у тих випадках, коли потрібно спочатку виконати деяку послідовність дій, а потім визначити, чи є потреба повторювати ці дії ще раз. Синтаксис оператора Repeat:

Repeat <оператори тіла циклу>

Until <yмова>;

Тут умова – вираз логічного типу; оператори тіла циклу – оператори, які виконуються при кожній ітерації.

Виконання оператора циклу Repeat починається з виконання вказівок, які входять у тіло циклу, після чого обчислюється вираз умова. Якщо умова хибна, то оператори тіла циклу повторюються,
якщо ж умова істинна – цикл Repeat припиняє свою роботу і виконується наступний оператор програми.
Блок операторів між Repeat і Until обов’язково виконується хоча б один раз.

Завдання 2. Вивести парні числа від 2 до 12.
var k: Integer;
begin
k := 0;
Repeat
k := k + 2;
Label1.Caption := IntToStr(k);
Until k > 10;
end;
Останнім надруковано число 12, оскільки при k = 10 умова ще була хибною, відбулась ще одна ітерація, і в тілі циклу k отримало значення 12.

Завдання 3. Знайти суму цифр натурального числа N, кількість цифр у якому невідома
var N, d, S: Integer;
begin
N := StrToInt(Edit1.Text);
S := 0;
Repeat
d := N mod 10; // виділено останню цифру числа
S := S+d; // значення d додається до суми цифр
N := N div 10; // відкидається остання цифра числа N
Until N=0; // Якщо N=O, цикл припиняє роботу
Edit2.Text := IntToStr(S);
end;

Завдання 4. Полічити кількість слів у введеному користувачем тексті.
Вважатимемо, що слова відокремлюються виключно одним пробілом, а перший і останній символи текста (рядка S) нe є пробілами.
Отже, кількість слів у рядку S на 1 більша за кількість пробілів.
Для введення текстового рядка використовується компонент Memo (вкладка Standard на палітрі компонентів): він дозволяє вводити багаторядковий текст із клавіатури як значення властивості Text типу String.

var S: String;
i, count: Integer;
begin
S := Memo1.Text; i := 0;
If Length(S) > 0 Then begin // Якщо довжина рядка S ненульова,
count := 1; // є хоч одне слово
Repeat
i := i + 1; // Перебираємо кожен символ рядка S
If S[i] = ‘ ‘ // Якщо знайдено пропуск
Then count := count + 1; // то збільшуємо лічильник слів на 1
Until i >= Length(S);
end
Else count := 0;
Edit2.Text := IntToStr(count);
end;

 VIІ. Підсумки уроку. Виставлення оцінок.

VІІI. Домашнє завдання

Вивчити розділ 6.7(cт.217) Завдання 5, 7 (ст.220) виконати в зошиті.