Если вынуть 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.
