Презентація з інформатики для 9 класу "«Табличні величини та алгоритми їх опрацювання».

«Табличні величини та алгоритми їх опрацювання».

Одновимірні масиви m [0] m [1] m [2] m [3] … m [i] … m [n] Порядковий номер елемента масиву Ім'я масиву For i:=1 to n do m [i]… 23 -12 48 12 … -76 … 89 m integer Зазвичай нумерацію починають з 1 (для зручності) For i:=0 to n do m [i]… Послідовність однотипних елементів, які зберігаються разом і мають спільне ім'я

Введення одновимірного масиву Способи введення В поле Memo Обчислення за формулою

 Компонент TMemo  призначений для роботи з багаторядковим текстом, який міститься у властивості Lines. Відео https://www.youtube.com/watch?v=x1L2E_lhYVM

Використання поля Memo Додавання до поля Memo1 смуг прокручування (властивість ScrollBars) Додавання до форми поля Memo1 Дозвіл або заборона редагування рядків компонентів поля Memo1 (властивість ReadOnly)

Обчислення кількості рядків в полі Мемо1 Memo2.Lines.Clear; Очистка поля Memo2 Оголошення (опис) одновимірного масиву var m: array [0..100] of real; Діапазон номерів елементів масиву 1. 2. 3. n:= Memo1.Lines.Count;

Введення одновимірного масиву з поля Memo for i:=1 to Memo1.Lines.Count do m[i]:=StrToFloat(Memo1.Lines[i-1]); Значення властивості = кількості рядків поля Memo1, заповнених даними Номер рядка (нумерація рядків починається з нуля) Значення властивості = набору значень, розташованих у рядках поля Memo1 (кожний рядок має номер; нумерація починається з нуля)

Виведення одновимірного масиву в поле Memo2 for i:=1 to Memo1.Lines.Count do Memo2.Lines.Append(FloatToStr(m[i])); Додавання нового рядка до багаторядкового поля Memo2 Значення властивості = кількості рядків, заповнених даними

Кінець Початок Введення m [ i ] i:=1, Memo1.Lines.Count, 1 Виведення m [ i ] m [ i ] : = m [ i ] * m [ i ] i:=1, Memo1.Lines.Count, 1 Введення, виведення та зміна елементів одновимірного масиву procedure TForm1.Button1Click(Sender: TObject); var i: byte; m: array [0..100] of real; begin for i:=1 to Memo1.Lines.Count do m[i]:=StrToFloat(Memo1.Lines[i-1]); Memo2.Lines.Clear; for i:=1 to Memo1.Lines.Count do begin m[i]:=m[i]*m[i]; Memo2.Lines.Append(FloatToStr(m[i])); end; end;

Форма

Виконання проекту

Програмний код

Формування випадкового масиву For i:=1 to n do r[i]:=random(b-a+1)+a; Функція random генерує випадкові числа Функція random генерує випадкові цілі числа на відрізку [a; b] Кількість елементів масиву

Виведення випадкового масиву For i:=1 to n do Memo3.Lines.Append(IntToStr(r[i])); Додавання нового рядка до багаторядкового поля Memo3

Формування та виведення випадкового масиву procedure TForm1.Button1Click(Sender: TObject); var a,b,n,i: integer; r: array [0..100] of integer; begin randomize; a:=StrToInt(Edit1.Text); b:=StrToInt(Edit2.Text); n:=StrToInt(Edit3.Text); Memo3.Lines.Clear; // очистка рядків поля Memo3 For i:=1 to n do begin r[i]:=random(b-a+1)+a; Memo3.Lines.Append(IntToStr(r[i])); end; end; Введення a, b, n i := 1, n, 1 Виведення r [ i ] r [ i ] : = random (b-a+1)+a Кінець Початок

Форма

Виконання проекту

Програмний код

https://www.youtube.com/watch?v=hQ-YX8uMr5E Відеоуроки