Составьте программу на Паскале.
Составить ведомость, включающую сведения об аудитории: номер аудитории, этаж, предназначение аудитории (лекции, лабораторные занятия). Дополнить список ещё одной аудитории.

// PascalABC.NET 3.2, сборка 1449 от 23.05.2017// Внимание! Если программа не работает, обновите версию!type  Предназначение=(лекции,лабораторные);  Ведомость=record    аудитория:integer;    этаж:integer;    назначение:Предназначение;  public    constructor Create(pa,pe:integer;pn:Предназначение);    begin      аудитория:=pa;      этаж:=pe;      назначение:=pn    end;  end;begin  var Вед:=new List<Ведомость>;  Вед+=new Ведомость(132,1,лекции);  Вед+=new Ведомость(204,2,лабораторные);  Вед.Println(NewLine)end.Результат(132,1,лекции)(204,2,лабораторные)