Вирусы и антивирусы. Самые известные вирусы и антивирусы
Массивы Массив – это упорядоченная последовательность данных одного типа В памяти компьютера массив можно представить в виде последовательности блоков памяти, имеющих одно имя и отличающихся каким-то признаком (индексом). Индексы В качестве индекса может выступать последовательность элементов любого перечислимого типа (т.е. такого типа данных, для каждого элемента которого известен предыдущий и/или последующий). Каждый элемент массива обозначается именем массива с индексом (Например, A[2])Элементы массива упорядочены по значениям индекса Массивы: одномерныедвумерные Одномерные массивы Описание массива: <Имя>:array[<элем 1>...<элемN>]of<тип><элем 1> и <элемN> - номера первого и последнего элементов массива Пример Например, строкаVar Mas: array[1..17] of real;Описывает массив из 17 чисел типа Real, имеющих порядковые номера (индексы) с 1,2,…,17, а строкаVar Mas: array[0..15] of integer;Описывает массив из 16 целых чисел с номерами 0,1,…,15 Вопросы: Var a:array [1..10] of integer;
i:real;
Var a:array [1..10] of real;
i:char;
Var a:array [1..n] of integer;
i:integer;
Var a:array [1..10] of integer;
i:string; Присвоение значений элементам массива может происходить с помощью: Оператора ReadОписания элементов массива в разделе описания константФункции Random Обработка массива (примеры) Сумма элементов массиваМаксимальный (минимальный) элемент массива var i,n: integer;a:array[1..10000] of integer;begin write('Введите размер массива '); readln(n); for i:=1 to n do begin write('a[',i,']='); readln(a[i]); end; for i:=1 to n do write(a[i]:5); end. const n=5;
a:array[1..5] of integer=(4,5,7,7,0);
var i: integer;
begin
for i:=1 to n do
write(a[i]:5);
end. var i,n: integer;a:array[1..10000] of integer;begin write('Введите размер массива '); readln(n); for i:=1 to n do begin a[i]:=random(10); end; for i:=1 to n do write(a[i],' ');end. var i,n,s: integer;a:array[1..10000] of integer;begin write('Введите размер массива '); readln(n); for i:=1 to n do begin a[i]:=random(10); end; for i:=1 to n do begin write(a[i],' '); s:=s+a[i]; end;writeln;write('Сумма элементов массива =',s);end. var i,n,max,min: integer;a:array[1..10000] of integer;begin write('Введите размер массива '); readln(n); for i:=1 to n do begin a[i]:=random(100); write(a[i],' '); end;min:=a[1];max:=a[1]; for i:=1 to n do begin if a[i]<=min then min:=a[i]; if a[i]>=max then max:=a[i];end; writeln; writeln('минимальный элемент массива ',min); writeln('максимальный элемент массива ',max);end.