8-А-клас-дистанційне-навчання – Сайт Уланівського ліцею

УРОК №20. Складання та виконання алгоритмів з елементами управління “список, що розкривається”

УРОК №21. Алгоритми з повтореннями для опрацювання величин

УРОК №10.Складання та реалізація алгоритмів із циклом із лічильником у середовищі програмування

УРОК.Складання та реалізація алгоритмів з повтореннями для опрацювання величин

УРОК.Складання та реалізація алгоритмів з повтореннями та розгалуженнями для опрацювання величин

УРОК.Графічне відображення даних засобами мови програмування. Відображення рисунків із зовнішніх файлів

Матеріали для залікового проекту КАЛЬКУЛЯТОР
Дане відео демонструє сценарій

Матеріали для проекту Калькулятор

УРОК.Величини текстового типу. Операції над ними. Текстові функції та процедури. Елемент для введення даних – текстове поле – EDIT
Текстові величини символьного типу – Char
1. Якщо змінну прописано типом Char, то значенням цієї змінної може бути лише ОДИН будь-який символ.
procedure vhid;
var
s : char;
Begin
s:=inputbox(‘Вхід у кабінет’,’Введіть Y/N’,”);
if s=’Y’ then write(‘Вхід виконано’)
else write(‘Ви не увійшли до кабінету’)

Символьні функції
Назва функції	Призначення	Приклад застосування
chr(x)	по коду символу Х дає символ	chr(65) → A
ord(ch)	По символу дає його код	ord(‘D’); → 68
pred(ch)	Дає символ, який є попереднім для даного	pred(‘E’) → D
succ(ch)	Дає символ, який є наступним для даного	succ(‘E’) → F
upcase(ch)	Перетворює малу АНГЛІЙСЬКУ букву на велику	upcase(‘f’) → F


Free Pascal: якщо змінна t символьного типу, 
то команду t:='R' (або t:='f', . . .) можна виконати, 
а команду t:='Ч' - не можна.
Free Pascal використовує систему кодування UTF8. 
В цій системі англійські букви кодуються БАЙТОМ, 
а букви кирилиці кодуються ДВОМА байтами.
При потребі в змінну символьного типу записати один символ кирилиці, 
то її оголошують типом TUTF8Char

Текстові величини стрічкового типу – String
Стрічковий тип даних – String.
Якщо ввімкнено директиву {$H-} – то в змінну стрічкового типу можна записати текст довжиною до 255 символів включно.
Якщо ввімкнено директиву {$H+} – то в змінну стрічкового типу можна записати текст довжиною до 2 Гбайт.
Приклад:
Var
name : string[15]; – в змінну можна записати текст не довший за 15 символів
t : string;
Стрічкові функції
!!! Результат функції залишається в імені функції

Назва функції	Призначення	Приклад застосування
Concat(s1,s2,…,sn:string):string	конкатенація (склеювання) стрічок	concat(‘ko’,’rok’) → ‘korok’
Length(s:string):Byte	Кількість байт у стрічці	Length(‘Doroga’) → 6 байт
Length(s:string):Byte	Кількість байт у стрічці	Length(‘Дорога’) → 12 байт
Length(s:string):Byte	Кількість байт у стрічці	Length(‘ДороGA’) → 10 байт
якщо стрічка повністю із символів кирилиці, то для відшукання кількості символів UTF8Length(S), але під’єднати модуль LCLProc
Copy(S:string,index,count:integer)	Із стрічки S вирізає підстрічку починаючи із символу з номером index i довжиною count	copy(‘інформатика’,3,6) результат → ‘формат’
Pos(Substr, s:string):integer;	Номер входження підстрічки в стрічку	Pos(‘інформатика’,’мат’) результат → 6

Стрічкові процедури
!!! Результат функції залишається в змінній перед якою стоїть слово VAR

Назва процедури	Призначення	Приклад застосування
Delete(Var S:string,index,count:integer)	Із стрічки S видаляється підстрічка	Delete(‘спортсмен’,6,4) → ‘спорт’
Insert(Var Sourse:string, S:string, index:integer)	Вставляє підстрічку S в стрічку Sourse з позиції index	Insert(‘Лисад’,’топ’,4) → Листопад
Val(s:string, V, code:integer)	Перетворює стрічку в число, якщо стрічка є коректним записом числа	Val(‘234.21’,V,code) → 234.21

Вищезгадані стрічкові функції і процедури безпомилково обробляють стрічки, що містять символи ЛАТИНИЦІ. Для обробки символів і КИРИЛИЦІ І ЛАТИНИЦІ використовують функції і процедури створені під кодування UTF8

Назва функції	Призначення	Приклад застосування
Concat(s1,s2,…,sn:string):string	конкатенація (склеювання) стрічок	concat(‘ko’,’rok’) → ‘korok’
UTF8Length(s:string):Byte	Кількість байт у стрічці	UTF8Length(‘Doroga’) → 6 байт
UTF8Length(s:string):Byte	Кількість байт у стрічці	UTF8Length(‘Дорога’) → 6 байт
UTF8Length(s:string):Byte	Кількість байт у стрічці	UTF8Length(‘ДороGA’) → 6 байт
UTF8Copy(S:string,index,count:integer)	Із стрічки S вирізає підстрічку починаючи із символу з номером index i довжиною count	UTF8Copy(‘інформатика’,3,6) результат → ‘формат’
UTF8Pos(Substr, s:string):integer;	Номер входження підстрічки в стрічку	UTF8Pos(‘інформатика’,’мат’) результат → 6

Стрічкові процедури
!!! Результат функції залишається в змінній перед якою стоїть слово VAR

Назва процедури	Призначення	Приклад застосування
UTF8Delete(Var S:string,index,count:integer)	Із стрічки S видаляється підстрічка	UTF8Delete(‘спортсмен’,6,4) → ‘спорт’
UTF8Insert(Var Sourse:string, S:string, index:integer)	Вставляє підстрічку S в стрічку Sourse з позиції index	UTF8Insert(‘Лисад’,’топ’,4) → Листопад
Val(s:string, V, code:integer)	Перетворює стрічку в число, якщо стрічка є коректним записом числа	Val(‘234.21’,V,code) → 234.21

Назва функції	Призначення	Приклад застосування
UpperCase(Str)	перетворює ANSI-стрічку Str у верхній регістр
UTF8UpperCase(Str)	перетворює UTF8-стрічку Str у верхній регістр
LowerCase(Str)	перетворює ANSI-стрічку Str у нижній регістр
UTF8LowerCase(Str)	перетворює UTF8-стрічку Str у нижній регістр

Домашнє завдання: Створити проект згідно зразка. Проект має перевіряти входження підстрічки в стрічку

УРОК.Величини логічного типу. Команда розгалуження
ОПЕРАЦІЇ ПОРІВНЯННЯ

Операція	Позначення	Приклад застосування
Більше	>	a+b > 10
Менше	<	a < b
Не більше	<=	a-b <= -6
Не менше	>=	k >= m-n
Дорівнює	=	a+5 = 25
Не дорівнює	<>	a <> 0

ОПЕРАЦІЇ НАД ЛОГІЧНИМИ ВЕЛИЧИНАМИ

Операція	Позначення	Приклад застосування
заперечення	not (не)	not(a+b) > 10
кон’юнкція	and (i, та)	(a < b) and (a<>4)
диз’юнкція (нестрога)	or (або)	(a-b <= -6) or b>5
диз’юнкція (строга)	xor (виключне або)	(k >= m-n) xor (not a=8)

Таблиця істинності для змінних логічного типу А та В, які набувають значень
True (1) та False (0)

A	B	not A	not B	A and B	A or B	A xor B
0	0	1	1	0	0	0
0	1	1	0	0	1	1
1	0	0	1	0	1	1
1	1	0	0	1	1	0

Створити таблицю істинності для логічного виразу:
not(A or not B) and (A xor B)

3	2	1	5	4
not 2	A or 1	not B	3 and 4	A xor B

A	B	1	2	3	4	5
A	B	not B	A or 1	not 2	A xor B	3 and 4
0	0	1	1	0	0	0
0	1	0	0	1	1	1
1	0	1	1	0	1	0
1	1	0	0	1	0	0

Зразок завдання. Заповнити таблицю істинності для логічного виразу:
not B or not A and B
Розв’язок завдання. Перехід на дошку Jamboard

Домашнє завдання: параграф 24

Заповнити таблицю істинності

A	B	C	not C	A and B and C	A or B or C	A or B and C	A and B or C	A xor B xor C
0	0	0
0	0	1
0	1	0
0	1	1
1	0	0
1	0	1
1	1	0
1	1	1

УРОК.Складання та виконання алгоритмів з елементами управління для задання логічного значення. Елемент для введення даних: ПРАПОРЕЦЬ

Мітка CheckBox(Прапорець) з вкладення Standard призначена для того,
щоб користувач міг вказати своє рішення типу:

так / ні (два стани прапорця)
так / ні / не впевнений (три стани прапорця)

Це рішення впливає на значення властивості State. Платформа може містити кілька таких компонентів.
Стан кожного з них ніяк не залежить від стану інших.
Деякі прапорці можуть перебувати у частково встановленому стані. Така можливість потрібна,
коли потрібно повідомити користувачеві про неповну відповідність.
Для активування такої можливості використовують властивість AllowGrayed.
Якщо для властивості AllowGrayed встановлено значення True, то прапорець
при послідовних клацання на ньому буде по черзі перебувати у таких станах:
скинутий;
встановлений частково;
встановлений.
Стан компонента визначається відповідним значенням властивості State:
cbUnchecked;
cbGrayed;
cbChecked.
Значення властивості State можна змінювати як під час проектування за допомогою інспектора об’єктів,
так і в програмі. Щоб реагувати на зміну стану прапорця, треба створити обробник події OnClick.
Основні властивості ПРАПОРЦЯ ;⇔ МІТКИ; ⇔ CheckBox)

ВЛАСТИВІСТЬ	Призначення властивості
Alignment	taRightJustify – прапорець зліва, а його caption справа
Alignment	taLeftJustify – прапорець справа, а його caption зліва
AllowGrayed	False True
AutoSize	якщо False то можна висталяти довільну ширину і висоту
Caption	Назва ПРАПОРЦЯ
Checked	True – прапорець “піднятий”, False – прапорець “опущений”
Enabled	True – прапорець доступний, False – прапорець недоступний”
Font	Задається шрифт
Height	Висота зони прапорця
Width	Ширина зони прапорця
Left	відступ зліва від лівого краю форми
Name	ім’я, яке використовується при програмному зверненні до прапорця
ParentBidiMode
ParentColor
ParentFont	Шрифт заданий на формі автоматично буде встановлюватись для об’єктів
SHowHint	True – показати спливаючу підказку, False – не показувати
Hint	текст спливаючої підказки
State	cbUnchecked – скинутий (опущений)
	cbGrayed – встановлений частково
	cbChecked – встановлений (піднятий)
Visible	True – видимий, False – невидимий
Top	відступ від верху форми

****************************************
Завдання: Створити проект текстова сторінка
1.Кількість і вид об’єктів розташованих на формі на малюнку.
2.Після запуску форми на ній присутні 8 прапорців і кнопка Показати і кнопка Закрити
3.Після натискання Показати з’являються кнопки Сховати, Очистити і Текстове поле, а кнопка Показати зникає.
4.Після натискання кнопки Очистити очищається вміст текстового поля
5.Після натискання кнопки Закрити форма закривається.
6.За вибір правильної відповіді 1 бал, а при виборі неправильної відповіді 1 бал знімається.

=======================================
RadioButton ↔ Радіокнопки

Домашнє завдання
1.Створити проект Тестове запитання на 4 відповіді серед яких правильних дві.
2.Створити проект Тестове запитання на 4 відповіді серед яких правильна одна.
3.Створити проект який містить 5 прапорців і 7 радіокнопок. Прапорці і радіокнопки пронумерувати. Натискання на першу кнопку вмикає перший прапорець, на другу вмикає другий і т.д. Натискання на шосту кнопку вмикає всі прапорці, а на сьому кнопку вимикає всі прапорці. Передбачити НАПИС в якому буде виводитись повідомлення про те, який прапорець активний, а чи активні чи не активні всі. Приклад повідомлення: Прапорець №3 активний; Активні всі прапорці

========================
Розв’язування компетентнісних задач
Задача 1. Обчислення вартості енергії.
С ц е н а р і й
1.Вводяться покази попередні і поточні
2.Вираховується використання енергії
3.Обраховується вартість спожитої енергії за схемою
4.Ціна одиниці спожитої енергії:

спожито до 100 одиниць енергії включно, вартість – 0,96 грн.
спожито більше 100 і не більше 300 одиниць енергії, вартість – 1,68 грн.
спожито більше 300 і не більше 500 одиниць енергії, вартість – 2,54 грн.
спожито більше 500 одиниць енергії, вартість – 4,05

5.Передбачити автоматичне виведення ціни в залежності від спожитої енергії
6.При неправильному введенні (поточні покази менші, ніж попередні) видається повідомлення і очищаються введені дані
7.На формі в початковий момент є тільки кнопка Розпочати.
8.При натисканні кнопки Розпочати з’являються написи, текстові поля.

Таблиця істинності для змінних логічного типу А та В, які набувають значень True (1) та False (0)

Домашнє завдання: параграф 24

Заповнити таблицю істинності

Таблиця істинності для змінних логічного типу А та В, які набувають значень
True (1) та False (0)