Алгоритм выполнения процедуры AddRecord

Процедура реализует добавление i -ой записи в массив записей. Количество записей в массиве увеличивается на единицу (MaxElem:=MaxElem+1). В цикле по j происходит переприсваивание элементов массива записей (обратите внимание на то, что цикл «идет» в обратном порядке, начиная с MaxElem и заканчивая i+1). Каждому последующему значению элемента массива присваивается предыдущее (mas[j]:=mas[j-1]). Затем следует ввод добавляемой записи - через процедуру InputFields(mas[i]).

Вывод нужных сообщений реализуется через процедуру OutMessageXY(x, y: byte; Str1, Str2:string).

Варианты

1-6

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по адресу юридической консультации, по названию юридической консультации, по фамилии, имени, отчеству (Ф.И.О.) адвоката или нотариуса, по номеру телефона адвоката или нотариуса.

Запросы:

1) Определить, сколько юридических консультаций находится в определенном районе.

2) Определить юридическую консультацию, в которой работает наибольшее количество адвокатов.

3) нотариусов.

4) Определить, сколько нотариусов и адвокатов работает в определенной юридической консультации.

5) Определить юридические консультации, которые находятся на одной определенной улице.

6) Определить юридические консультации, которые находятся в одном определенном районе

7-13

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: дате, предмету судебного разбирательства, названию фирмы-истца, названию фирмы-обвиняемого.

Запросы:

7) Определить, в каком году было больше всего дел, связанных с мошенничеством.

8) Определить, в каком году было больше всего дел, связанных с банкротством.

9) Определить, в каком году было больше всего дел, связанных с разводами.

10) Определить, в каком году было больше всего дел, связанных с дискриминацией.

11) Определить фирму, по которой возбуждалось уголовное дело более 2-х раз.

12) Определить, в каком году чаще всего возбуждали уголовное дело против определенной фирмы.

13) Определить, какая фирма чаще всего за эти годы выступала в роли истца.

14-24

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по названию фирмы-подрядчика, по стоимости строения, по типу строения, по сумме вклада банке.

Запросы:

14) Определить клиентов, у которых сумма вклада в банке меньше стоимости строения.

15) Определить клиента, который полностью выплатил сумму стоимости строения.

16) Определить тип постройки, который клиенты заказывали более 2-х раз.

17) Определить клиента с максимальной суммой счета в банке.

18) Определить вид постройки с максимальной стоимостью.

19) Определить вид постройки с минимальной стоимостью.

20) Определить клиента с максимальным процентом за кредит.

21) Определить клиента с минимальным процентом за кредит.

22) Определить невыплаченную сумму всех клиентов

23) Найти клиента с минимально невыплаченной суммой.

24) Найти клиента с максимально невыплаченной суммой.

25-34

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по наименованию товара, по году поступления, по стране поставки, по фирме поставщику.

Запросы:

25) Определить фирму, товар которой поступал чаще всего.

26) Определить фирму, товар которой поступал меньше всего.

27) Вычислить затраты на приобретение товаров за все годы.

28) Определить наименование товара с максимальной стоимостью.

29) Определить наименование товара с минимальной стоимостью.

30) Вычислить затраты на приобретение товаров за все годы.

31) Определить страну поставщик, в которой чаще всего заказывали товары.

32) Определить страну поставщик, в которой меньше всего заказывали товары.

33) Определить, в какой месяц поступило больше всего товара.

34) Определить, в какой месяц поступило меньше всего товара.

35-43

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по названию банка, по Ф.И.О. клиента, по стране, по адресу клиента, по годовому доходу.

Запросы:

35) Определить клиентов, которые имеют счета в двух и более банках.

36) Определить банки, в которых годовой процент максимальный.

37) Определить банки, в которых годовой процент минимальный.

38) Определить страну, в которой больше всего банков.

39) Определить клиента, имеющего максимальный вклад в банке.

40) Определить страну, в которой меньше всего банков.

41) Определить клиента, имеющего минимальный вклад в банке.

42) Определить количество банков в конкретной стране.

43) Определить банк, в котором максимальное количество клиентов.

44-60

Предусмотреть вывод значений для полей элементов массива записей по следующим ключам: по наименованию товара, по названию фирмы, по чистой прибыли, по издержкам, по типу деятельности.

Запросы:

44) Определить фирму с наибольшим объемом продажи.

45) Определить фирму с наименьшим объемом продажи.

46) Определить суммарную себестоимость реализованного товара.

47) Определить фирму с чистой максимальной прибылью.

48) Определить чистую суммарную прибыль всех фирм.

49) Определить самый рентабельный тип деятельности, исходя из показателей чистой прибыли.

49) Определить самый рентабельный тип деятельности, исходя из показателей чистой прибыли.

50) Определить самый нерентабельный тип деятельности, исходя из показателей чистой прибыли.

55) Определить фирму, тип деятельности которой связан с производством автомобилей.

56) Определить фирму, тип деятельности которой связан с реализацией товаров народного потребления.

57) Определить фирму, тип деятельности которой связан с производством и размещением рекламы.

58) Определить тип деятельности с минимальными издержками.

59) Определить фирмы, в которых чистая прибыль ниже ее среднего значения по всем фирмам.

60) Определить фирму, у которой издержки превышают чистую прибыль.

Не нашли, что искали? Воспользуйтесь поиском: