Главная страница Случайная страница Разделы сайта АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатикаИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханикаОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторикаСоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансыХимияЧерчениеЭкологияЭкономикаЭлектроника |
Массивы.
Объявление переменной массива происходит в разделе var. При этом используется зарезервированное слово array, указывается тип массива и его размерность перечислением индексов, а также объявляется тип данных в массиве. Пример 1:
Пример 2: var masiv: array ['a'..'z'] of integer; Для обращения к элементу массива в Pascal-программе указывается имя массива и в квадратных скобках индексы элемента. Пример 1: a [2, 4] а) ввести значение: read (A[2, 4]); б) изменить значение: A[2, 4]: =5; в) сообщить значение: write (A[2, 4]); Пример 2: masiv ['b']; masiv['b']: =47*24; Задача ввода элементов массива. а) линейного:
program vvod; var A: array [1..10] of integer; i: integer; begin for i: =1 to 10 do read (A[i]); end.
б) двумерного:
program vvod; const n=5; m=7; var A: array [1..n, 1..m] of real; i, j: integer; begin for i: =1 to n do for j: =1 to m do read (A[i, j]); end.
Задача 2: найти минимальный элемент в массиве:
program min; const n=10; var i: byte; a: array [1..n] of real; min: real; begin for i: =1 to n do read (A[i]); min: =A[1]; for i: =1 to n do if min> A[i] then min: =A[i]; write (min); end.
|