1.

К какому типу относится следующее описание?
kniga=record
nazvan: string[25];
godizdat:1000..1988;
zena:real;
end;

2.

Определите количество полей в данной записи:

Type

Auto = record

Model, Name, Address, Color : string[30];

Year: integer;

Number: 0..9999;

End.

3.

Известно, что
TYPE TIME=RECORD
CHAS:0..23;
MINUT, SEKUND: 0..59;
VAR T1,T2:TIME;

Написать программу, которая вводит значения полей записей T1 и T2 и печатает TRUE, если T1 предшествует T2, и печатает FALSE в противном случае.

4.

Имеется описание:
type family=record
glavafamily: string[15];
vosrast1:18..100;
supruga: string[10];
vosrast2:18..100;
dety: string[5];
end;
var a,b:family;
Занести исходную информацию в переменную A, без использования оператора присоединения и продублировать ее в переменную B.

5.

Определить запись, включающую в себя следующую информацию:

название завода изготовителя;
название завода поставщика сырья;
номер магазина-потребителя;
названия производимых товаров, 50 наименований;
цена каждого товара за 1 штуку в рублях и копейках;
количество каждого товара в штуках.

Все наименования содержат не более 15 символов.

6.

Дана ведомость учащихся, занимающихся в кружке по программированию:

Алешина Елена 5
Ковалев Иван 5
Андрианов Глеб 4
Поддубный Игорь 4
Павликова Юля 5
Кемарская Ира 5
Агафонов Стас 5
Антонова Оля 5

Определить количество учащихся, занимающихся в кружке на 5, число учащихся с фамилией, начинающейся на букву "А".