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

Одномерные массивы. Массивом называется совокупность данных, выполняющих аналогичные функции

Читайте также:
  1. RAID-массивы и матрицы
  2. Двумерные массивы
  3. ДВУМЕРНЫЕ МАССИВЫ
  4. ДВУМЕРНЫЕ МАССИВЫ
  5. Двумерные массивы
  6. Двумерные массивы
  7. Двумерные массивы

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

Массив в Паскале <имя массива>:= array <количество элементов> of <тип переменной>;

Каждый элемент массива в общем виде описывается как А[I], где

А - имя массива, I - номер или индекс массива (0<=I<=N, но практически употребляется 1<=I<=N)

A[I] - значение элемента массива.

Пример 1. Ввод значений элементов массива с помощью генератора случайных чисел и вывод их в строчку.

Примечание:

Для использования случайных чисел в TP используются операторы

random:real - генерирует случайные числа в диапазоне 0...0.99.

random(i:word):word - генерирует случайные числа в диапазоне 0...1.

randomize - изменение базы генератора случайных чисел.

program mas1;

var

a: array [1..10] of integer;

i: integer;

begin

randomize;

for i:=1 to 10 do

begin

a[i]:=random(20);

write('a(', i, ')=', a[i], ' ')

end;

readln

end.

Пример 2. Составить программу определения количества элементов одномерного массива, значение элементов которых меньше

заданного действительного числа t.

program mas3;

var a: array [1..10] of real;

i,k: integer; t:real;

begin

write('Введите число t=');

read(t);

k:=0;

for i:=1 to 10 do

begin

write('Введите значение элемента a(', i, ') = ');

readln(a[i]);

if a[i]<t then k:=k+1

end;

writeln('Ответ: Количество элементов, меньших заданного числа t,');

writeln('равно k=',k);

readln

end.

Задания для самостоятельной работы по вариантам:

1. Дан массив. Определить количество элементов, больших суммы первого и второго элементов массива, и напечатать их номера.

2. Дан массив. Найти количество элементов, значение которых больше среднего арифметического минимального и максимального элементов массива.

3. Рост 25 учеников класса представлен в виде массива. Определить количество учеников, рост которых больше среднего роста по классу.

4. В массиве записана информация о стоимости 20 видов товара. Определить, сколько видов товара имеют стоимость меньшую, чем средняя стоимость всех видов товара.

5. Количество осадков (в мм), выпавших за каждый день января, хранится в массиве. Определить количество дней, в которые выпало осадков больше, чем за 1 день месяца.

6. В массиве записаны оценки по информатике 22 учеников класса. Определить количество учеников, оценка которых меньше средней оценки по классу, и вывести номера элементов массива, соответствующих таким ученикам.

7. Известно количество осадков (в мм), выпадавших в Москве каждый год в течение первых 50 лет прошлого столетия. Вычислить среднее количество осадков и отклонение от среднего для каждого года.

8. Дан массив из 20 чисел. Найти элемент, который меньше на 10 среднего значения всех элементов массива.

9. Дан массив. Вывести на экран сначала неотрицательные элементы массива, потом отрицательные.

10. Дан массив целых чисел. Вывести на экран сначала четные элементы массива, потом нечетные.

11. Известны данные о количестве осадков, выпавших за каждый день марта. Вывести на экран день, когда выпало наибольшее количество осадков.

12. Дан массив вещественных чисел. Выяснить верно ли, что максимальный элемент превышает минимальный не более чем на 25;

13. Дан массив вещественных чисел. Выяснить верно ли, что минимальный элемент меньше максимального более чем в два раза?

14. Известна масса каждого человека из группы. Верно ли, что масса самого тяжелого из них превышает массу самого легкого более чем в два раза?

15. Известна численность каждого из 40 классов школы. Верно ли, что в самом многочисленном классе учится на 10 учеников больше, чем в самом малочисленном?

16. В массиве записаны оценки по математике 25 учеников класса. Определить количество учеников, оценка которых больше средней оценки по классу, и вывести номера элементов массива, соответствующих таким ученикам.

17. Вес 25 учеников класса представлен в виде массива. Определить количество учеников, вес которых больше среднего роста по классу.

Задание на дом: подготовить отчет по проделанной работе

Содержание отчета:

1. Постановка задачи

2. Алгоритм решения задачи.

3. Список используемых переменных.

4. Блок-схему

5. Текст программы.

6. Результат ее выполнения.

7. Выводы.

 

 


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


<== предыдущая страница | следующая страница ==>
Практичне заняття| Теоретически й материал.

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