Студопедия
Случайная страница | ТОМ-1 | ТОМ-2 | ТОМ-3
АвтомобилиАстрономияБиологияГеографияДом и садДругие языкиДругоеИнформатика
ИсторияКультураЛитератураЛогикаМатематикаМедицинаМеталлургияМеханика
ОбразованиеОхрана трудаПедагогикаПолитикаПравоПсихологияРелигияРиторика
СоциологияСпортСтроительствоТехнологияТуризмФизикаФилософияФинансы
ХимияЧерчениеЭкологияЭкономикаЭлектроника

Пример 4.1

Читайте также:
  1. II. Большие инновационные циклы: пример России и сравнение с другими странами
  2. III. Примерный перечень вопросов для
  3. SWOТ- анализ страны на примере Казахстана
  4. Vi. Некоторые методические примеры экономического обоснования проектируемых мероприятий
  5. VII. Примерная последовательность разработки и реализации программ педагогического сопровождения семьи в общеобразовательном учреждении
  6. А сколько - таких же фантастических примеров принципиальности правоохранительных органов (кроме смоленских)?
  7. А1. Пример задания для курсового проектирования

a) var amper: array [0..30] of real;

Описан массив с именем amper, состоящий из 31 элемента типа real; индексация его элементов начинается с нуля и заканчивается целым числом 30.

б) var v, w: array [-1..15] of integer;

Описаны два эквивалентных массива v и w целого типа, содер­жащие по 17 элементов в каждом.

Описание массивов с помощью описания типов. Этот способ вклю­чает себя два этапа: сначала в разделе описания типов объявляется пользовательский тип, а затем в разделе описания переменных указывается имя массива, принадлежащего данному типу:

type имя типа = array [ тип индекса ] of тип элементов;

var имя массива: имя типа;

 

Пример 4.2.

type vec = array [-5..10] of integer;

var b: vec;

Обращение к элементу массива. Массивы не могут обрабатываться целиком. Для того, чтобы получить доступ к элементу массива, нужно записать обращение к нему, которое выглядит как

имя массива [ индекс ]

В качестве индекса можно использовать константу, переменную или выражение, соответствующие типу индексов, объявленному в опи­сании массива.

Пример 4.3

b[100], c[k], yes[j+2]

Приведены обращения к элементам массивов с именами b, c и yes. Значения переменных k и j должны быть определены заранее.

Ввод и вывод одномерных массивов. Для ввода и вывода всего массива или его части используют операторы цикла, как правило, оператор for.

Пример 4.4

Var

z: array [10..100] of integer;

K: integer;

Begin

for k:= 10 to 100 do read (z [ k ]);

for k:= 21 to 30 do write (z [ k ]);

В приведенном фрагменте программы вводятся все элементы мас­сива z целого типа, а выводятся 10 его элементов – с 21-го по 30-й.

Отдельные элементы массивов вводятся так же, как и простые переменные.

Организация циклов с использованием массивов

Задачи такого рода являются весьма распространёнными в вы­числительной практике, и программировать их можно с использованием любого из трёх описанных выше операторов цикла. Но наилучшим для этой цели часто является оператор for. Ниже приведены примеры организации циклических вычислитель­ных процессов с помощью оператора for.

Пример 4.5. Дан вектор a, содержащий 50 компонент. Вычислить сумму его элементов.

Вначале надо ввести массив в компьютер, затем – вычислить сумму элементов.Как и любая сумма нескольких чисел, данная сумма вычисляется методом накопления.

Var

I: integer;

S: real;

a: array [1..50] of real;

Begin

write ('введите массив ');

for i:=1 to 50 do read(a[i]);

s:=0; { обнуление ячейки s, предназна­ченной

для накопления суммы }

for i:=1 to 50 do s:= s + a[i];

{ накопление суммы элементов массива }

writeln ('s=', s:10:3)

End.

Пример 4.6. Дан вектор b, содержащий 100 компонент. Найти наибольший элемент этого вектора.

Суть алгоритма задачи в следующем. Используется переменная с именем мах, в которой в каждый момент выполнения программы содержится максимум из уже просмотренных элементов (текущий максимум). Вначале мах равна первому элементу b[1]. Перебираются все элементы массива, и если встречается элемент больше мах, то его значение присваивается мах.

var max: real;


Дата добавления: 2015-07-18; просмотров: 95 | Нарушение авторских прав


Читайте в этой же книге: Конструктивные элементы языка PASCAL | Структура программы на языке PASCAL | Пример 2.2. | Порядок выполнения операций | Ввод числовых данных с клавиатуры | Вывод данных на экран монитора | Пример 3.4 | Условные и составные операторы | Вычисление сумм | K: integer; |
<== предыдущая страница | следующая страница ==>
Readln (x, eps);| I : integer;

mybiblioteka.su - 2015-2024 год. (0.006 сек.)