Какой записи алгоритмов предлагает нумерованный список​

Если вынуть 98 конфет, то будут конфеты всех 3 видов.
Пусть у нас по n конфет каждого вида.
Тогда может так получиться, что мы вынем 2n конфет, и они будут только 2 видов. И только, вынув (2n+1)-ю конфету, мы получим все три.
2n+1 = 98
2n = 97.
Значит, конфет одного и другого вида по [97/2] = 48,
а конфет третьего вида 49.
Пусть ирисок и леденцов по 48, а шоколадных 49.
Вынув 48 ирисок и 48 леденцов (96 конфет), мы получим 2 вида.
Вынув 48 ирисок и 49 шоколадных (97), мы получим 2 вида.
Вынув 48 леденцов и 49 шоколадных (97), мы получим 2 вида.
И только вынув 98-ую (в 1 случае 97 и 98), мы получим 3 вида.
ответ: всего конфет было 48 + 48 + 49 = 145.

Запись (record) — это пользовательский тип данных, котоорый может содержать поля с различными типами данных, например:

type
  schools = (1, 2, 3, 4, 5, 6, 7, 8, 9, 10)
  students = record
     name, surname : string;
     age : byte;
     school : schools;
  end;

Для обращения к полям записи из главной программы необходимо разделять имя переменной типа Запись и поля, которое оно содержит, символом "." (точка). Например:

var
  student : students;

begin
  student.name := 'Иван';
  student.surname := 'Пупкин';
end.

Если необходимо получить или изменить значения нескольких полей записи, то удобнее использовать конструкцию with:

begin
  with student do begin
     name := 'Вася';
     surname := 'Пупкин';
     age := 12;
     school := 5;
  end;
end.