19. Типы данных определяемые пользователем. Ограниченный и перечисляемый тип.

Указывая тип данного программист сообщает транслятору:1)диапазон значений которое может принимать переменная 2)допустимые операции над этой переменной Существует 2 способа указать тип данного:1)в разделе var или const 2)в разделе описания типов(type) в разделе type описываются придуманные программистом типы, т.е. стандартные типы не нужны type имя типа = описание типа … var имя переменной : имя типа например(перечисляемый) type menu=(read,write,edit,quit) var m,n:menu интервальный тип данных type имя=конст_1...конст_2 type Hour=0..23 var r:0..23

20.Одномерные массивы: способы описания, ввод-вывод элементов, типовые операции. Примеры

Массив-это сложная структура представляющая собой именованный набор однотипных переменных, расположенных в памяти непосредственно друг за другом, доступ к которым осуществляется по индексу(номеру). Описание 1)в разделе типов type имя_типа=array(тип индекса) of тип_элемент type mas=array(1..6) of real; color=array (byte) of mas;a=array(menu) of Boolean; var c:mas(т.е. в программе будет использован с именем С состоящий из вещественных чисел) 2)описание массива в разделе переменных var имя_массива:array(тип индекса) of тип элемента, например var a,b:array (1..n) of integer; c:array(1..10,1..10) of byte после описания массива транслятор выделяет в оперативной памяти нужное количество ячеек нужной дины, дина зависит от типа элемента 2)Обращение к элементам массива обратится можно только к отдельному элементу, указав в квадратных скобках его индекс, целиком обратится к массиву нельзя Операции с массивами а)формирование массива способы: -ввод элементов с клавиатуры(read) формирование по правилу(например, A(i):=i+2, чтение из файла, простое присваивание a(i):=12 ,формирование при помощи датчика случайных чисел(random) все операции над элементами массива выполняются в цикле, чаще в for Вывод элементов:вывод на экран(write) или запись в файл Пример Пусть известно, что в автопарке, имеющем 18 машин марки КАМАЗ, каждый из КАМАЗов перевез за день определенный объем груза. Определить суммарный объем перевозок грузов за день. Program pr1;Type KAMAZ =array[1..18] of real;Var i:integer; P:KAMAZ; S:real;BegiS:=0;For i:=1 to 18 doBeginWriteln (‘Введите объем перевозок ', i, ‘-й машины, т');Readln (p[i]);S:=S+p[i];End;Writeln (‘Суммарный объем перевозок S=',S:8:2,' т');End.

21. Двумерные массивы: способы описания, ввод-вывод элементов, типовые операции. Примеры.

Двумерный массив это матрица(таблица) каждый элемент имеет 2 индекса A_ij Описание: в разделе типов type имя_типа=array(тип индекса) of тип_элемента в разделе переменных var mas:array(1..10,1..20) of real x:array(1..20) of array(1..10) of real Пример: найти количество отрицательных элементов двумерного массива var a:array(1..10,1..10) of real begin for i:=1 to 10 do for j:=1 to 20 do a(I,j):=random for i:=1 to 10 begin k:=0 for j:=1 to 10 do if A(I,j)<0 then k:=k+1 B(i):=k writeln(‘В строке №’,I,’ ‘,k,’ отрицательных элементов); end.