Презентация на тему Поняттямасиву. Оголошеннямасивів. Індексаціяелементівмасиву.Введенняданих у масив

змінна, що входить до масиву, називається елементом масиву.
Масив, у

якому кожний елемент визначається тільки одним порядковим номером, називається одновимірним.
Ім’я кожного елемента одновимірного масиву складається з імені масиву й узятого у квадратні дужки порядкового номера цього елемента в масиві.

типу . Якщо надати ім’я масиву a, то імена

змінних – елементів цього масиву будуть такі: a[1], a[2], a[3], ..., a[100]. Кожна з цих змінних матиме тип Real.

змінна a типу одновимірний масив оголошується так:
var a:

array [1..100] of Real
(англ. array – масив).
У квадратних дужках указується діапазон номерів елементів масиву: від 1 до 100. За цим записом компілятор виділяє в пам’яті комп’ютера 100 ділянок під кожну зі 100 змінних – елементів масиву. Розмір кожної ділянки залежить від типу елементів масиву.

можна скористатися багаторядковим полем (компонент типу TMemo), який можна

розмістити на формі так само, як й інші компоненти

чисел, які вводяться в рядки багаторядкового поля, піднести ці

числа до квадрата і вивести ці квадрати в інше багаторядкове поле.

Розмістимо на формі два багаторядкових поля з іменами Memo1 і Memo2, розташуємо їх на формі одне поруч з іншим та встановимо для них значення властивостей:
Height = 150,
ScrollBars = ssVertical,
ReadOnly = False.
Розмістимо на формі також кнопку, встановимо для неї
Caption = 'До квадрата'
і створимо процедуру, пов’язану з подією OnClick для цієї кнопки.

i:integer;
begin
for i:=1 to 10 do

a[i]:= StrToFloat (Memo1.Lines[i-1]);
for i:=1 to 10 do a[i]:= a[i]*a[i];
Memo2.Lines.Clear;
for i:=1 to 10 do Memo2.Lines.Append(FloatToStr(a[i]));
end;

пов’язані з багаторядковим полем: процедура
Clear (англ. clear –

очищувати), що очищує всі рядки цього компонента,
Append (англ. append – додавати), що додає до багаторядкового поля новий рядок і виводить у нього значення параметра, вказаного в дужках.

чисел, які вводяться в рядки багаторядкового поля, піднести ці

числа до квадрата і вивести ці квадрати в інше багаторядкове поле.

Змінити процедуру так, щоб команда повторення використовувалася 1 раз

begin
for i:=1 to 10 do a[i]:= StrToFloat (Memo1.Lines[i-1]);
for i:=1 to 10 do a[i]:= a[i]*a[i];
Memo2.Lines.Clear;
for i:=1 to 10 do Memo2.Lines.Append(FloatToStr(a[i]));
end;

i:integer;
begin
Memo2.Lines.Clear;
for i:=1 to 10 do
Begin
a[i]:=

StrToFloat (Memo1.Lines[i-1]);
a[i]:= a[i]*a[i];
Memo2.Lines.Append(FloatToStr(a[i]));
end;
end;

число серед значень елементів даного масиву з десяти дійсних

чисел.

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

i,k:integer;
x:real;
begin
x:= StrToFloat(Edit1.Text);

k:=0;
for i:=1 to 10 do
begin
a[i]:= StrToFloat (Memo1.Lines[i-1]);
if a[i]=x then k:=k+1;
end;
Label1.Caption:=IntToStr(k)+' разів';
end;

серед значень елементів даного масиву з десяти дійсних чисел.

Можна було б розв’язати цю задачу аналогічно попередній: визначити, скільки елементів масиву дорівнюють даному числу, і якщо ця кількість 0, то даного числа в масиві немає, а якщо більше 0, то є.

i,k:integer;
x:real;
begin
x:= StrToFloat(Edit1.Text);
k:=0;

for i:=1 to 10 do
begin
a[i]:= StrToFloat (Memo1.Lines[i-1]);
if a[i]=x then k:=k+1;
end;
If k=0 then Label1.Caption:=‘ зустрічається‘
else Label1.Caption:=' не зустрічається‘ ;
end;

що дане число є значенням уже першого елемента масиву.

Тоді всі інші елементи масиву переглядати не потрібно, а попередній метод розв’язування передбачає обов’язковий перегляд усіх елементів масиву.

змінну логічного типу f і присвоїмо їй початкове значення

false (дане число в масиві поки ще не траплялося). Порівнюватимемо послідовно значення елементів масиву з даним числом і якщо один з них дорівнює даному числу, то змінимо значення змінної f на true і перервемо виконання циклу командою break (англ. break – переривати). Виведення результату реалізуємо залежно від значення змінної f.