Тема.

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

Обладнання: комп'ютери, опорні конспекти, підручники, таблиці.

Учні повинні знати: поняття табличних величин, їх опис мовою програмування Pascal, по­няття індексу масиву; означення одновимірних та двовимірних масивів і відмінність між ними; способи введення та виведення елементів масиву, принципи обробки елементів масиву, Учні повинні вміти: описувати мовою програмування одновимірні та двовимірні масиви, роз­в'язувати задачі з використанням уведення, обробки та виведення елементів масиву, знаходження суми та добутку елементів таблиць.

Тип уроку. Урок удосконалення знань, формування вмінь і навичок розв'язувати задачі.
ХІД УРОКУ

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

Аналіз домашньої роботи, розбір завдань, які не було виконано в домашніх умовах.

• 
  Що ми розуміємо під масивом у програмуванні?
  
• 
  Як здійснюється опис таблиці?
  
• 
  Що таке «індекс масиву»?
  
• 
  Які масиви називаються одновимірними, які — двовимірними?
  
• 
  Як організовується введення елементів масиву? Як організовується виведення елементів масиву?
  
• 
  Як відбувається обробка масивів?
  

II. Постановка теми, мети

III. Виклад теми. Розв'язування задач
Задача 1. ( Сума елементів таблиці)

Знайти середньодобову температуру, якщо відомі значення температур щогодини

протягом цієї доби.

Наприклад:

i(год))	1Т	2	3	4	5	6	7	8	9	10	11	12	13	14	15	16	17	18	19	20	21	22	23	24
t(i)	1	1	1	0	0	0	-111	0	0	1	2	2	3	3	4	4	4	3	2	2	2	1	1	-1

Розв'язання

Очевидно, що для знаходження середньодобової температури потрібно визначити середнє ариф­метичне зі значень 24 температур протягом доби. Відповідно спочатку слід визначити суму цих температур. Позначимо цю суму s, її початкове значення дорівнює нулю.

Результатом виконання алгоритму є отримане значення суми температур s, поділене на 24, яке буде дійсним числом. Позначимо його ts.

program z1;

uses crt;

var trarray [1..24] of integer; і,s:integer; ts:real;

begin

clrscr;

writeln('Уведіть значення температур:');

for i:=l to 24 do

begin

write('t[‘,i,']=') ;

readln(t[i]);

end;

s: =0;

for i:=l to 24 do

s:=s+t[i]; ts:=s/24;

writeln('Середня температураза добу:',ts:2:3);

readln;

end.



Зауваження. Для знаходження добутку елементів ма­сиву достатньо зробити дві зміни у наведеній вище програмі: замінити операцію додавання операцією множення і почат­кове значення змінної, в якій буде накопичуватися добу­ток, замінити на 1.
Задача 2.( Добуток елементів)

В одновимірному масиві дійсних чисел а [ 1: n] знайдіть добуток усіх елементів з парними

індексами.
Розв'язання Позначимо добуток змінною p. Його початкове значення дорівнює 1.

Перший спосіб

program z2;

uses crt;



var a:array [1..1000] of real;

i,n:integer; p:real;

begin

clrscr;

write('Уведіть кількість елементів

масиву');

readln(n); {Уведення n}

writeln('Уведіть значення елементів

масиву:');

for і:=1 to n do

begin

write('a[',i,']=');

readln(a[ I ]);

end;

p:=1; i:=2;

while i<=n do

begin

p:=p*a[ I ] ; i:=i+2;

end;

writeln('Добуток елементів таблиці з парними індексами дорівнює', р:2:3) ;

readln;

end.
Зауваження.

1. Виведення суми або добутку елементів масиву виконують за межами циклу.

2. Якщо кількість елементів у масиві невідома (наприклад — n), то в описі таблиці резервуємо пам'ять на елементи таблиці із запасом (наприклад, a: array [1..1000] of real;) або перед описом (наприклад, а: array [l..n] of real;) кількість елементів розглядаємо як константу (наприклад — const n=10).

Другий спосіб

program z2;

uses crt;

const n=7;

var a:array [l1..n] of real; і:integer; p:real;

begin

clrscr; p:=1;

wrіteln(‘Уведіть значення елементів масиву:');

for і:=1 to n do

begin

write(‘a[‘,i,']=');

readln(a[i]);

end; _P:=l; i:=2;

while i<=n do

begin

p:=p*a[ i ] ;

i:=i+2;

end;

writeln(‘Добуток елементів таблиці з парними індексами дорівнює', р:2:3);

readln;

end.

Додаткові завдання

Задача 3. Знайти суму непарних елементів таблиці дійсних чисел m [ 1: 9 ].

Задача 4. Знайти добуток від'ємних елементів таблиці дійсних чисел b [ 1: 4,1:5 ].

Задача 5. Задано натуральні числа п, р, цілі числа c_vc₂, с₃, ...,с_n. Знайти добуток тих еле­ментів послідовності c_vc₂, с₃, ..с_n, які кратні p.
IV. Введення та реалізація програм на комп'ютері

V. Підсумок уроку. Повідомлення домашнього завдання. Мотивація подальшої діяльності
УРОК 20. ОПРАЦЮВАННЯ ТАБЛИЧНИХ ВЕЛИЧИН

Тема. Складання алгоритмів та програм на опрацювання табличних величин.

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

Обладнання: комп'ютери, картки, підручники, посібники, таблиці, опорні конспекти.

Учні повинні знати: поняття табличних величин, їх опис мовою програмування Pascal, поняття індексу масиву; означення одновимірних та двовимірних масивів та відмінність між ними; способи введення та виведення елементів масиву, принципи обробки елементів масиву, правила використання операторних дужок, розділових знаків, логічних умов під час обробки масивів, порядок виконання дій на комп'ютері, правила знаходження суми або добутку елементів таблиці, команди роботи в середовищі мови програмування Turbo Pascal 7.0. .

Учні повинні вміти: описувати мовою програмування одновимірні та двовимірні масиви, роз­в'язувати задачі з використанням уведення, обробки, виведення елементів масиву, знаходити суму і добуток елементів таблиці.

Тип уроку. Урок формування вмінь і навичок.

ХІД УРОКУ І. Актуалізація опорних знань

1. 
   Перевірка домашнього завдання. Аналіз створених програм.
   
2. 
   Фронтальне опитування.
   

—Що ми розуміємо під масивом у програмуванні?

• 
  Як здійснюється опис масивів?
  
• 
  Що таке «індекс масиву»?
  
• 
  Які масиви називаються одновимірними, які — двовимірними?
  
• 
  Як організовується введення елементів масиву? Як організовується виведення елементів масиву?
  
• 
  Як відбувається обробка масивів?
  

II. Постановка теми, мети

III. Виклад теми. Розв'язування задач

Задача 1. Опишіть цілочисельний одновимірний масив з дев'яти елементів та знайдіть кількість елементів, рівних 8.

Розв'язання

Нехай дано лінійний масив цілих чисел b [1: 9], Позначимо k— кількість елементів масиву, які дорівнюють числу 8.

program nl; uses crt;

var b:array [1..9] of integer; і,k:integer; begin clrscr;

for i:=l to 9 do begin

write('Уведіть елемент масиву

Ь[', і, Ч=')/ readln(b[i]); end; k:=0;

for i:=l to 9 do begin

if b[i]=8 then k:=k+l; end; writeln(^Кількість елементів,

рівних числу 8, дорівнює:', k:3) readln; end.

( Кінець J

Задача 2. Дано таблицю дійсних чисел т[1:10]. Створити масив дійсних чисел г [1:5], кожний елемент якого є модудем відповідного елемента масиву m [ 1:10 ], розміщеного на непар­ному місці.

Розв'язання

Очевидно, що в результаті виконання алгоритму отримаємо: r[l] : = |m[l] | ; r[2] : = (m[3] | ; r[3]:=im[5]I; r[4]:=|т[7]|; г[5]:=!т[9]|.

]=', r[j]:3:2)
program n2; uses crt;

var m:array [1..10] of real; r:array [1..5] of real; і,j:integer; begin clrscr;

for i:=l to 10 do begin write('Уведіть елемент масиву

m[' , і, *]=') readln(m[i]); end; j:=l; i:=l;

while i

r[j] :=abs(m[i]) ; j:=j+l; i:=i+2; end;

for j:=1 to 5 do begin

writeln ( ^xr [ V_f j end; readln; end.

Задача З. Знайдіть добуток усіх від'ємних чисел уве-денного з клавіатури масиву дійсних чисел g [ 1: 5,1: 7 ].

Розв'язання
Нехай добуток елементів масиву, менших за нуль,
містить змінна/?. •

program n3; uses crt;

var g: array [1..5,1..7] of real; і,j: integer; p:real; begin

clrscr;

for i:=l to 5 do r

begin

for j:=1 to 7 do begin

write(^xУведіть елемент масиву

g[\ і, ^Л ,', j, 4 = 4;

readln(g[і,j]); end; end; p:=l;

for i:=l to 5 do

begin

for j:=1 to 7 do

begin *

if g[i,j]<0 then p:=p*g[i,j]; end; end; writeln(^чДобуток від"ємних дорівнює', p:2:3); readln; end.

Додаткові завдання Задача 4. Дано натуральне число гс та дійсні числа а₁₉ а₂, а₃,..., а_п. Визначити:

1. 
   подвоєну суму додатних членів послідовності a_va₂, а₃,..., а_п;
   

1. 
   кількість елементів послідовності а_іга₂,а₃,..., а_л, значення яких належить інтервалу [ та суму всіх інших членів послідовності;
   

2. 
   суму додатних та кількість від'ємних елементів послідовності а_%9а₂, а₃,..., а_п.
   

IV. Введення та реалізація програм на комп'ютері

V. Підсумок уроку. Мотивація подальшої діяльності

УРОК 21. ПОШУК У ТАБЛИЦЯХ ПЕВНИХ ЕЛЕМЕНТІВ


1   2   3   4

скачати