Презентація на тему «Масиви»

content: Табличні величини. Масиви

content: Знайти суму елементів одновимірного масиву.Program Suma;var A:array[1..5] of integer;S,i:integer;beginfor i:=1 to 5 dobeginwrite ('A[',i,']=');readln (A[i]);end;s:=0;for i:=1 to 5 do S:=S+A[i];writeln ('масив А:');writeln;for i:=1 to 5 do write (A[i]:5);writeln;writeln('S=',S);end.

content: Одновимірний масивМасив – це структурний тип даних, який складається з фіксованого числа елементів одного і того ж типу.Одновимірний масив – це лінійно впорядкована сукупність елементів одного і того ж типу.Характерні особливості масиву:Тип елементів повинен бути описаний конкретно. До кожного елементу масиву існує прямий доступ.Число елементів масиву визначається під час його опису і надалі не змінюється.Описати масив можна:1-ий спосібtype імя типу=array[тип індексу] of тип компонент масиву;var індентифікатор масиву: імя типу;Наприкладtttype MAX=array[1..5] of integer;var A:MAX;2-ий спосібvar індентифікатор масиву:array[m..n] of тип компонент масиву;де m,n – константи цілого типу.Наприкладttvar A:array[1..5] of integer;

content: Двовимірний масивДвовимірний масив можна розглядати як таблицю, яка складається з m – рядків і n – стовпчяиків.В загальному випадку можна описати масив так:1-ий спосібtype імя типу=array[тип індексу] of array[тип індексу] of тип компонент масиву;var індентифікатор масиву: імя типу;Наприкладtttype MAS=array[1..5] of array [1..4] of integer;var A:MAS;2-ий спосібvar індентифікатор масиву:array[m..n,k..h] of тип компонент масиву;де m,n – константи цілого типу.Наприкладttvar A:array[1..5,1..4] of integer;

content: Можливості введення/виведенняВведення масиву рядком здійснюється так:for i:=1 to 3 dofor j:=1 to 4 do read (A[i,j]);Щоб можна було вводити таблицю у «природньому вигляді» - рядок за рядком, необхідно використати:for i:=1 to 3 dobeginfor j:=1 to 4 do read (A[i,j]);readln;end;Виведення масиву рядком:for i:=1 to 3 dobeginfor j:=1 to 4 do write (A[i,j]);Виведення таблиці у «природньому вигляді»:for i:=1 to 3 dobeginfor j:=1 to 4 do write (A[i,j]:6);writeln;end;

content: Приклади програмЗнайти мінімальний елемент масиву.Program Minimum;const n=10;var A:array[1..n] of integer;MIN,i:integer;beginfor i:=1 to n dobeginwrite ('A[',i,']=');readln (A[i]);end;MIN:=A(1);for i:=1 to n doif A(i)writeln ('масив А:'); writeln;for i:=1 to 5 do write (A[i]:5);writeln; writeln;writeln('MIN=',MIN);end.

content: Програма для виведення додатніх елементів матриці A[1..3,1..4]. В кожному рядку друкувати елементи, які належать до даного рядка таблиці. Якщо в рядку немає додатніх елементів, то він повинен бути порожнім.Program Proba;const n=3; m=4;var A:array[1..n,1..m] of integer;j,i:integer;begin writeln ('Введіть значення елементів таблиці:'); writelnfor i:=1 to n dobeginfor j:=1 to m dowrite ('Введіть A[',i,',',j,']=');t{відображається підказка про номер елемента}readln (A[i,j]);readln; end;writeln; writeln('Загальний вигляд таблиці:'); writeln;for i:=1 to n do begin for j:=1 to m do writeln (A[i,j]);writeln; end;writeln('Загальний вигляд таблиці після перетворення:');for i:=1 to n do begin for j:=1 to m do if A[i,j]>0 then write (A[i,j]:5)else writeln(' ');writeln(); end; end.