Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Metodichka.docx
Скачиваний:
16
Добавлен:
21.02.2016
Размер:
959.24 Кб
Скачать

Ход работы

  1. Входной контроль:

  • Что такое массив? Что такое индекс массива?

  1. Выполнение работы:

  • Создать новый проект и назвать его именем «%NAME%5»

  • В теле проекта набрать следующий программный код:

Program %NAME%5;

uses crt;

var

i,j,k,n:integer;

mas:array[1..100] of integer;

begin

clrscr;

i:=0;

k:=0;

while i<100 do

begin

inc(k);

n:=0;

for j:=2 to k-1 do

if k mod j <> 0 then inc(n);

if n=k-2 then

begin

inc(i);

mas[i]:=k;

write(mas[i], ' ');

end;

end;

end.

  • Откомпилировать проект

  1. В случае нахождения ошибок, устранить их и перекомпилировать проект.

  • Запустить проект на выполнение (все варианты выполнения должны быть проработаны).

  • Используя меню DEBUG/OUTPUT вывести на экран результаты работы

    1. Вывод по работе

    2. Дополнительные вопросы

    • В какой среде работает ТР?

    • Что означает термин «запуск на исполнение»?

    • Как вывести на экран какой либо текст?

    Методические указания и пояснения практической работы 12

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

    В Паскале, кроме простых типов данных (integer, real, char и т.д.), имеются и сложные типы. К ним относятся массивы.

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

    Элемент массива– отдельная переменная, входящая в массив;

    Индекс(index)– это числовая константа или целочисленное арифметическое выражение (частный случай - целочисленная переменная), которым снабжаются элементы массива, чтобы отличать их друг от друга.

    Индекс элемента массива– номер элемента в массиве.

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

    a11

    a12

    a1n

    a21

    a22

    a2n

    am1

    am2

    amn

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

    Двухмерный массив

    В одномерном массиведля указания местоположения элемента достаточно одного индекса,

    В двухмерноммассиве – два индекса, для строк и граф.

    Размерностьмассива определяется количеством индексов.

    Размер массива – диапазон изменения индексов массива.

    Размер одномерного массива– количество элементов, которое содержит массив.

    Размер двухмерного массива -количество элементов в сроках и графах таблицы и т.д.

    Описание массивов:

    Тип массива

    Описание массива

    1 способ

    2 способ

    одномерный:

    Type t=array[1..n] of тип;

    Var a:t;

    Var a: array[1..n] of тип;

    двухмерный

    Type р=array[1..n,1..m] of тип; Var a:р;

    Var а=array[1..n,1..m] of тип;

    трехмерный

    Type р=array[1..n,1..m,1..k] of тип; Var a:р;

    Var a=array[1..n,1..m,1..k] of

    Пример описания одномерного массива размерностью 20:

    type mas=array[1..20] of integer;

    var a : mas;

    mas – имя типа,

    a– имя переменной типа массив.

    Границы изменения индексов - от 1 до 20, т.к. размерность 20 элементов

    const mas : array [1..7]

    of byte=(31,–7,4,3,25,–3,2);

    Массив, объявленный как константа, т.е. совмещается объявление массива и занесение в него констант.

    Следует помнить, что значением переменной aявляется весь массив!

    Элемент массива обозначается указанием имени массива, за которым в квадратных скобках следует индекс массива. Например, a[1] – первый элемент одномерного массива; с[5] – пятый элемент одномерного массива; a[i] – i-тый элемент одномерного массива или для двухмерных массивов: с[1,5] – пятый элемент первой строки массива; a[i,j] – j-тый элемент i-й строки двухмерного массива.

    В двухмерном массиве первый индекс - номер строки, второй - номер столбца.

    Двухмерные массивы иногда называют матрицами. Двухмерные массивы могут быть прямоугольными (количество строк и столбцов разное) или квадратными (одинаковое количество строк и столбцов). В двухмерных массивах элементы, у которых номер строки совпадает с номером столбца, называются диагональными или элементами главной диагонали. Главная диагональ начинается с первой с роки первого столбца и заканчивается на последней строке последней графы. Кроме главной диагонали существует побочная диагональ - с последней графе первой строки до первой графы последней строки.

    Базовые алгоритмы работы с одномерными массивами

    Будем считать, что объявили массив из 10 элементов, тип элементов в данном случае значение не имеет:

    1. заполнение одномерного массива:

    • заполнение с клавиатуры:

    for i:=1 to 10 do

    begin

    writeln (‘Введите значение элемента’);

    readln(a[i]);

    end;

    • заполнение случайным образом:

    for i:=1 to 10 do

    a[i]:=random(n); {n должно быть задано заранее}

    • заполнение натуральными числами:

    for i:=1 to 10 do

    a[i]:=i;

    • поменять местами два заданных элемента массива:

    c:=a[i]; a[i]:= a[j]; a[j]:=c;

    • заполнение по формуле (например, ai=sin i):

    for i:=1 to 10 do

    a[i]:=sin(i);

    1. вывод массива на экран:

    for i:=1 to 10 do

    writeln (‘элемент ’, i, ‘ массива ’,a[i]);

    1. нахождение суммы элементов одномерного массива:

    s:=0;

    for i:=1 to 10 do

    s:=s+a[i];

    1. подсчёт количества элементов, удовлетворяющих заданному условию(например, положительных элементов):

    k:=0;

    for i:=1 to 10 do

    if a[i]>0 then k:=k+1;

    1. поиск максимального элемента одномерного массива и его номера:

    max:=a[1];

    n:=1;

    for i:=2 to 10 do

    if a[i]>max then begin max:=a[i]; n:=i; end;

  • Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]