Система задач и упражнений по языку программирования Pascal. Часть 2 - 21 стр.

UptoLike

ВУЗ: 

ЯГПУ им. Ушинского | Ярославль

Составители: 

Рубрика: 

21
(5)
B = [3,8,6,7,10,26,5];
C = [8,7,2,5,3,11,12];
D =
[6,12,26,9,20,13,15];
A = [6,12,26];
(6)
B=[5,2,3,4,12,13,20]
C = [8,10,12,6,7,2];
D = [6,2,15,12,21];
A = [2,12];
(7)
B=[7,12,13,25,30,29];
C=[13,16,26,30,18,12
];
D= [5,6,7,12,29,13];
A = [30];
(8)
B=['A','B','C','D','E','F','G'];
C = ['B','D','K','F','L','M'];
D = ['M','P','Q','Z','A','G'];
A = ['C','E'];
11. В каком случае:
(1) А + В = [ ];
(2) А - B = [ ];
(3) A * B = [ ];
(4) A + B = A;
(5) A - B = A;
(6) A - B = B;
(7) A * B = A.
Записи
1. Что такое запись? В чем ее отличие от других структур данных?
2. Из чего состоит запись? Какого типа могут быть ее компоненты?
3. Как употребляется в программе оператор with?
4. Укажите синтаксические ошибки:
(1) type koor:record
x,y,z=0..100;end;
vektor:record
n,k=koor;end;
var A:array[1..4]of vektor;
B:koor; x:integer;
(4) type ent=record
author,tite:string[50]
bibl=record
nom:real;
kn:ent;
var A:array[1..10] of bibl;
B:array[1..10] of ent;
(2) type date=record
day:1..31;
month:1..12;
year:1..9999; end;
rem=record
mes=array[1..5] of string[9];
ev=date;end;
var tod:date; a:day;
mem:array[1..100] of rem;
(5) type klass=record
f,im:string[20];end;
oc=record
ocenka:array[1..3] of integer;
f:klass;end;
var B:array[1..10] of oc;
(3) type com:record
a,b:real;end;
plo:record
c:real
d: complex;end;
var a,b:array[1..100] of
com;plo:real;
5. Укажите тип переменной, если есть
следующее описание:
type data=record
day:1..31;
month:1..12;
year:1..9999;

Страницы