Практична робота

Рівень 1. (1-3 бали)

Задача 1. На скільки років потрібно покласти в банк суму have, щоб отримати суму want, якщо банк нараховує 25% річних? Вивести на екран значення суми кожного року і загальну кількість років.

Задача 2. Ускладнити задачу.

Відсоткову ставку зробити змінною і вводити з клавіатури

Рівень 2. (4-6 балів)

Задача 3. В учнів було S грн. В школі проходить збір макулатури. Один чистий зошит коштує new грн, списаний зошит коштує full грн. Складіть алгоритм, за яким можна визначити, скільки учні зможуть купити зошитів, якщо вони повертатимуть списані зошити й на отримані гроші купуватимуть чисті?

Рівень 3.(6-9 балів)

Задача 4. Літак може вмістити 4000 кг багажу. Пасажири здають валізи масою від 20 до 40 кг. Скільки валіз може вмістити літак?

Задача 5. Ускладнити задачу

Вагу літака ввести з клавіатури

Мінімальну та максимальну вагу валізи ввести з клавіатури

Рівень 4 (10-12 балів)

Задача 6.

Секретар за один день відповідав на 4 електронні листи, кожного наступного дня він виповідав на 2 електронних листа більше. Але він не може відповісти більше , ніж 108 листів за день. На який день це станеться?

Задача 7. Ускладнити задачу

Ввести кількість листів на перший день

Ввести на скільки більше листів він відкриває щодня

Ввести максимальне значення листів на день

Друкувати номер дня і кількість відкритих листів в той день

Практична робота

 Форматування електронної таблиці

1.     На першому аркуші створіть таблицю за зразком та обрахуйте вільні поля з максимальним використанням вбудованих функції.

Формули 

2.     На другому аркуші створіть тижневий валютний звіт по зміненню курсу долара та об’єму обміну громадянами валюти. (Обрахуйте вільні поля. (Різниця обміну повинна будуватись на основі функцій та виводи завжди додатне число)

Звірте з результатом

Алгоритми опрацювання табличних величин

У магазині обслужили за день N (N 200) покупців, кожен із яких витратив на покупки не більше за K (K 500) гривень. Визначити денний прибуток магазину і середню суму споживчого чека. Знайти кількість покупців, які витратили на покупки суму, більшу за середній чек за день.

1) Створіть новий проект. Змініть значення властивості Captіon форми, розмістіть на формі компоненти і налаштуйте їхні властивості згідно з рисунком. Текстове поле Edit1 призначене для введення кількості покупців; поле Memo1 — для виведення значень елементів масиву; список ListBox1 — для виведення результатів обчислень.

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

var Form1: TForm1;

Mas: array[1..200] of Integer; sr: Real; N: Integer;

3) Властивості ScrollBars елемента керування Memo1 задайте значення ssAutoHorizontal. Створіть процедуру обробки події для кнопки Заповнити масив.

var i: Integer;

begin

N := StrToInt(Edit1.Text);

Randomize; Memo1.Clear;

For i := 1 to N do begin

Mas[i] := 1 + Random(500);

Memo1.Lines.Add(IntToStr(Mas[i]));

end;

end;

4) Створіть процедуру обробки події для кнопки Обчислити денний прибуток. Результати обчислення виведіть у поле списку ListBox1.

var i, sum: Integer;

begin

sum := 0;

For i := 1 to N do sum := sum + Mas[i];

ListBox1.Items.Add(ꞋДенний прибуток: Ꞌ + IntToStr(sum) + Ꞌ грн.Ꞌ);

sr := sum/N;

ListBox1.Items.Add(ꞋСeреднiй чек: Ꞌ + FormatFloat(Ꞌ0.##Ꞌ,sr) + Ꞌ грн.Ꞌ);

end;

5) Створіть процедуру обробки події для кнопки Знайти кількість чеків. Запишіть оператори для знаходження кількості елементів масиву, значення яких більші за середнє значення. Результати обчислень виведіть у поле списку ListBox1.

6) Перевірте роботу програми. Збережіть проект у папці Вправа 34.

Олімпіада

 

Всеукраїнська олімпіада з програмування 2021-го року

Година коду 2020

Година коду є одно-годинним вступом до інформатики, призначеним для демістифікації програмування, а також демонстрації того, що кожен може опанувати його основи, і залучення учасників до сфери інформатики.

Година коду відбувається щороку протягом тижня інформатики. 

У 2020 тиждень інформатики припадає на 7-13 грудня, але Годину коду можна проводити протягом року. Тиждень інформатики проходить щороку на честь дня народження піонера комп'ютерних наук Адмірала Грейс Мюрей Хоппер (9 грудня 1906).

Година коду 2020

Angry Birds
https://studio.code.org/hoc/1

Танцювальна вечірка https://code.org/dance

Minecraft vol.3-4
https://studio.code.org/s/hero/stage/1/puzzle/1
https://studio.code.org/s/aquatic/stage/1/puzzle/1

Зоряні війни https://studio.code.org/s/starwars/stage/1/puzzle/1

Minecraft Education Edition 2019
Порятунок села від пожежі та відновлення лісу (світ)

Minecraft Education Edition 2020
Казка Minecraft про два села (світ)

CodeCombat(2019)

за посиланням 

 код входу RoomPlayShoe

Тест "Команди циклу на мові програмування Python"

Самостійна робота « Введення/виведення елементів масиву»

 

Практична робота «Елемент керування Багаторядкове текстове поле»

 Вправа 33

Створити програму-перекладач з української мови на англійську.

1) Створіть новий проект. Змініть значення властивості Caption форми і розмістіть на формі два компоненти Memo згідно з рисунком. Властивості ScrollBars елементів Memo1, Memo2 надайте значення ssVertical для появи вертикальних смуг прокручування.

За допомогою Редактора рядків масив Memo1.Lines заповніть українськими словами, масив Memo2.Lines — їхніми англійськими відповідниками.

Розмістіть на формі компоненти Label, Button, Edit і налаштуйте їхні властивості згідно з рисунком.

2) Опишіть глобальні змінні для збереження масивів слів:

var Form1: TForm1;
Eng_words, Ukr_words: array[0..100] of String;

3) Створіть процедуру обробки події OnClick для кнопки Заповнити масиви слів. Запишіть оператори для заповнення масивів Ukr_words і Eng_words масивами Memo1.Lines і Memo2.Lines:

var i: Integer;
begin
For i := 0 to Memo1.Lines.Count – 1 do
begin
Ukr_words[i] := Memo1.Lines[i];
Eng_words[i] := Memo2.Lines[i];
end;
end;

4) Створіть процедуру обробки події OnClick для кнопки Перекласти англійською. Запишіть оператори для перекладу українського слова на англійську мову:

var i: Integer; S: String;
begin
S := Edit1.Text; // вводимо слово, яке бажаємо перекласти
i := –1;
Repeat i := i + 1; // збільшуємо індекс елемента
Until Ukr_words[i] = S; // поки не знайдемо слово S
Edit2.Text := Eng_words[i]; { виводимо елемент із масиву англійських слів із таким індексом, як у слова S у масиві українських слів }
end;

5) Створіть процедуру обробки події OnClick для кнопки Перекласти українською.

6) Перевірте роботу програми. Збережіть проект у папці Вправа 33.

Тест "Команди умови у мові програмування Python"

Багаторядкове текстове поле

 

Увага! Конкурс!

iTalent - всеукраїнський конкурс з ІТ та кіберспорту

https://italent.org.ua/

Безліч різноманітних номінацій та цікавих тем, велика база робіт за минулі роки (можна приклади подивитися тут https://winners.italent.org.ua/) 

Кінець реєстрації 25 грудня. Поспіши!