Информатика - описать класс "собака" с методом. Помогите пожалуйста!!!

// PascalABC.NET 3.3, сборка 1547 от 07.10.2017// Внимание! Если программа не работает, обновите версию!type  Собака=class    public     procedure Голос;  begin    Writeln('Гав!')  end;end;// пример вызоваbegin  var Тузик:=new Собака;  Тузик.Голосend.