![]() |
Главная Случайная страница Контакты | Мы поможем в написании вашей работы! | |
|
Uses crt;
const n=5; m=4;
var a:array [1..n,1..m] of real;
j,i:integer;
S:real;
Begin
for i:=1 to n do
for j:=1 to m do
Begin
write('A[', i, ', ', j, ' ] = ');
read(a[i, j]);
End;
for j:=1 to m do
Begin
s:=0;
for i:=1 to n do
s:=s+a[i,j];
s:=s/n;
writeln('среднеарифметическое в строке №',j,' = ', s);
End;
End.
Записи
Запись – конечное множество поименованных элементов произвольного типа.
Элементы, из которых состоит запись, называют полями.
Синтаксис описания типа запись:
Record
Ид_поля1, Ид_поля2...: описание_типа|ид_типа;
...
End;
Запись удобно представлять в виде строки в таблице. Таким образом, множество записей представляет собой непосредственно таблицу. Средствами языка Pascal таблица может быть организована как одномерный массив с элементом типа запись.
Пример описаний структур данных типа запись:
type
{описание нового пользовательского типа PhRec}
PhRec = record
No: integer;
Name: string [20];
Phone: string [18];
end;
var
{описание двух переменных типа PhRec}
Zap1, Zap2: PhRec;
{описание массива из 20-ти элементов типа PhRec}
Tab: array [1..20] of PhRec;
В данном примере переменные Zap1 и Zap2 представляются отдельными строками, а переменная Tab – таблицей, состоящей из 20-ти строк (рис. 22).
Название поля | No | Name | Phone | |
Содержимое | ||||
![]() ![]() | ||||
Название поля | No | Name | Phone | |
Содержимое | ||||
![]() ![]() | ||||
Название поля | No | Name | Phone | |
индексы | ||||
Содержимое | ||||
... | ||||
![]() ![]() |
Рисунок 22 – Структура записей и массива записей
Дата публикования: 2014-11-26; Прочитано: 317 | Нарушение авторского права страницы | Мы поможем в написании вашей работы!