ВУЗ:
Составители:
Рубрика:
29
са). В одной мере умещалось 6 гарнцев, а в гарнце - 4 кварты . Старинный
гарнец , использовавшийся в Великом княжестве Литовском, был равен 5,6 л,
а с 1765 г. был введен новый гарнец , равный 2,82 л. Точно такая же система
мер использовалась и у других народов, только различной оказывалась ве-
личина единиц : старинный русский гарнец - 3,28 л, а польский гарнец равен
3,77 л. Составьте процедуру, подходящую для того, чтобы перевести количе-
ство жидкости из любого упомянутого вида единиц в любой другой .
3. В Великобритании жидкости измеряют в галлонах и бушелях . Один галлон
равен 4,54609 л, 8 галлонов составляют бушель. Составьте процедуру для
сложения двух объемов жидкости, измеренных в английских единицах , и
функцию для перевода количества жидкости, измеренного в литрах , в гал -
лоны и бушели.
4. Используя следующий фрагмент программы , напишите процедуру Value(x,y),
которая вычисляет y - значение квадратного трехчлена ax
2
+bx+c в комплекс-
ной точке x .
type complex = record re, im: real end;
coeff = record a, b, c: complex {a<>0} end;
5. Пусть даны комплексное число z (пара вещественных чисел ) и вещественное
число
ε
>0. Вычислить с точностью
ε
значение комплексной функции:
(
)
ln()......1
2
3
1
23
1
+=−+−+
−
+
−
zz
zz
z
n
n
n
,
(
)
z < 1
.
6. Используя следующий фрагмент программы , опишите функцию для нахож -
дения минимального отрицательного числа из списка чисел.
const MaxN=30;
type ВещТип = record знак: boolean;
мантисса, порядок: real end;
список = array [1..MaxN] of ВещТип;
7. Используя следующий фрагмент программы , опишите процедуру DP(d,p),
преобразующую координаты точки на плоскости из декартовых d в поляр -
ные p, и процедуру PD(p,d), выполняющую обратное преобразование.
type декарт = record x,y: real end;
поляр = record r, fi: real {r
≥
0, 0
≤
fi<
2
π
} end;
8. Сведения об ученике состоят из его имени и фамилии, названия класса (года
обучения и буквы), в котором он учится, оценок, полученных учеником за
последнюю четверть . Пусть дан массив, содержащий сведения об учениках
школы. Сформируйте массив из лучших учеников школы, то есть из учени-
ков, не имеющих отметок ниже “четырех” и по сумме баллов не уступающих
другим ученикам своего и параллельного классов.
9. Багаж пассажира характеризуется количеством вещей и общим весом вещей .
Пусть дан массив, содержащий информацию о багаже нескольких пассажи-
ров. Дайте сведения о багаже, число вещей в котором не меньше, чем в лю -
бом другом багаже, а вес вещей не больше, чем в любом другом багаже с
этим же количеством вещей .
