Інструктивна картка:

а. відкрийте середовище Turbo Delphi 2007 і створіть новий проект;

б. розмістіть на формі елементи керування за зразком:

в. створіть обробник подій OnClick для кнопки Button1, що знаходить суму цілих додатніх чисел, кратних k і менших а в окремому вікні;

г. протестуйте проект, підставивши зачення:

1) k=3, a=10,

2) k=6, a=15,

3) k=10, a=63;

д. порівняйте результат виконання проекту та відповідь при матемачному обчисленні суми;

е. збережіть виконуваний файл проекту в своїй папці під назвою „Практична робота №5”.

Висновок

Я вважаю, що моя оцінка за практичну роботу .

Оцінка вчителя (практина частина) .

Оцінка за всю практичну роботу .

Практична робота „ Обробка одновимірних масивів”

1. Масив це-

.

2. Елементами масиву можуть бути

.

3. Поле „Memo” це -

.

4. lines це -

.

5. array це -

.

6. d:=array[1..20] of integer;

Заповніть пропуски:

Масив d це масив, який складається з _____ елементів, _______________типу.

7. Поясніть рядок коду проекту:

a[i]:=StrToFloat(Memo1.Lines[i-1];

.

8. Які з одновимірних масивів описані правильно, а які - ні?

а) var A:array[1..5] of real;

б) type MAS=ARRAY['A'..'D'];

var B:mas;

в) var С:[integer] of char;

r) var D:array[trae..false] of char;

Правильно: ________ Неправильно: __________

9. Вкажіть з допомогою знаків „+” і „- ”, які з наведених нижче масивів описані правильно, а які -ні.

а) var a:array[1..5] of real;

б) type Mas:array[1..5] of real;

var A:Mas;

в) type Mas=array[ 1:5] of real

var A:Mas;

r) typeMas=array[1..5] of real;

var A:Mas;

ґ) type Mas=array [ 1,5] of real;

var A:Mas;

д) var A:array[1..5] fo real;

10. Скільки елементів містить кожен з масивів?

а) var A:array['A'..'C'],2..5] of real; ________;

б) var B:array[false..true] of boolean; ________; в)typeC=(ml,m2,m3,m4);

varX:array[C]; ________.

11. Розв`яжіть математично задачу.

Використовуючи мережу Інтернет, заповніть таблицю температур за останній місяць.

Місяць:
Дата	Середньодобова температура, 0С	Дата	Середньодобова температура, 0С

Використовуючи дані з таблиці, знайдіть:

Максимальний температурний показник місяця:______.

Мінімальний температурний показник місяця:________.

Середньомісячний показник температури:___________.

Кількість днів, коли температура була нижче 0⁰С:______.

12. Практична частина.

Створіть проект знаходження максимального, мінімального, середньомісячного температурного показника місяця та кількості днів, коли температура була нижче 0⁰С, скориставшись даними таблиці завдання 11