Одномерные массивы

Понятие массива При решении задач с использованием большого количества однотипных упорядоченных данных, удобно хранить эти данные в виде таблиц. В языке программирования Паскаль реализована возможность работы с таблицами (массивами).

Понятие массива Массив (таблица, матрица) представляет собой группу переменных, но в то же время эту группу переменных можно рассматривать и как единое целое единый массив

Понятие массива Каждому массиву дается собственное имя (идентификатор). Массив представляет собой упорядоченную группу т.е. переменные в массиве пронумерованы. Обращение к элементам массива осуществляется по индексу: A[1], D[24], Massiv[5], Mas[i].

Понятие массива Количество элементов в массиве фиксировано, т.е. ограничено определенным числом. Размер массива количество элементов в массиве. Размерность массива это диапазон целых чисел, который указывается при описании массива: A[1..50], B[ ].

Понятие массива Все переменные, входящие в массив, должны хранить данные одного типа (Real, Integer, Char, Boolean и т.д.).

Понятие массива Массив (таблица, матрица) упорядоченная группа фиксированного количества переменных одного типа, имеющая общее имя

Одномерный массив Одномерный массив (вектор) массив, состоящий из одной строки. Одномерные массивы

Описание массивов Массив описывается в разделе переменных посредством указания типа его элементов и максимального их количества: Var Имя_массива : array[размерность] of тип элементов; array масса, множество, совокупность.

Пример Const N=100; Var A, R : array[1..50] of real; B : array[1..N] of integer; {массивы А и R состоят из 50-ти вещественных чисел, массив В из ста целых чисел}

Ввод и вывод значений элементов массивов Вводить и выводить значения элементов массивов необходимо поэлементно, используя в цикле операторы READLN, WRITE, WRITELN и оператор присваивания.

Задача Заполните массив А[1..5] целыми однозначными числами c клавиатуры. Выведите значения элементов массива в столбец и в строку. Составьте блок схему и программу.

Ввод массива WRITELN('Введите целые числа в массив'); FOR i:=1 TO 5 DO BEGIN WRITE('A[',i,']= '); READLN(A[i]) END; A[1]=7 A[2]=5 A[3]=0 A[4]=9 A[5]=

Вывод массива в столбец FOR i:=1 TO 5 DO WRITELN('A[',i,']=',A[i]); A[1]=7 A[2]=5 A[3]=0 A[4]=9 A[5]=1

Вывод массива в строку FOR i:=1 TO 5 DO WRITE( A[',i,']=',A[i]); A[1]=7 A[2]=5 A[3]=0 A[4]=9 A[5]=1

Сформулируйте задачу For i:= 1 To 10 Do Begin S:=S+A[i]; P:=P*F[i]; k:=k+1; R[i]:=i; End;

Program Input_Output; Var i:integer; A:array[1..5] of integer; Begin Writeln('Введите целые числа в массив'); For i:=1 To 5 Do Begin Write('A[',i,']= '); Readln(A[i]) End; Writeln('Массив заполнен, для вывода массива в столбец нажмите Enter'); Readln; For i:=1 To 5 Do Writeln('A[',i,']=',A[i]); Writeln(Для вывода массива в строку нажмите Enter'); Readln; For i:=1 To 5 Do Write( A[',i,']=',A[i]); Readln; End.

Задача 1 Заполните массив А[1..5] целыми случайными однозначными числами (A[i]:=random(10). Найдите среднее арифметическое элементов массива. Выведите значения элементов массива и среднего арифметического.

Задача 2 В целочисленном массиве B[1..n] подсчитайте количество пятерок и среднее арифметическое остальных элементов массива. Для контроля выведите в строку значения элементов массива. Используйте форматный вывод. n=10, n=20, n=100.

Задача 3 В массиве из десяти чисел найдите минимальный элемент. Для контроля выведите значения элементов массива. Составьте блок-схему и программу.

Задача 4 В массиве из пятидесяти чисел найдите максимальный элемент, определите количество таких элементов в массиве и их индексы.

Задача 5 Перепишите элементы массива А в массив В в обратном порядке.