Объясните классы в паскале.

[artem55555p]

Здравствуйте. Начал изучать классы в паскале. Вот взял такой пример программки:

interface

uses
  System, System.Windows.Forms;

type
//----------------------------------------------------------
  Numeric = class 
  private 
    Value: byte;//значение
  public 
    constructor(Val: byte);
    begin
      Value := Val;
    end;
    
    function Numer.GetValue: byte;
  end;
 //---------------------------------------------------------- 
  Model = class
    Num: Numeric;
  public 
    
    constructor(val: byte);
    begin
      Num := new Numeric(val);
    end;
    
    function Model.ModFive(Val:byte): boolean;
    function Model.NumSum(Val:byte): byte;
  end;
//----------------------------------------------------------
  Check = class
    
    Num: Numeric;
  public 
    constructor(val: byte);
    begin
      Num := new Numeric(val);
    end;
    
    function Check.isGood: boolean;
  end;
//----------------------------------------------------------
implementation 


function Numeric.GetValue: byte;//ОДНО ЧИСЛО
begin
  Result := Value;
end;


function Model.ModFive(Val:byte): boolean; //кратно 5 или нет?
begin
  if ((Num.GetValue mod 5) = 0) 
  then Result := true
  else Result := False;
end;

function Model.NumSum(Val:byte): byte;//сумма чисел
begin
  result := (Num.GetValue() div 10) + (Num.GetValue() mod 10);
end;



function Check.isGood: boolean;//проверка
begin
  if ((Num.GetValue >= 10) and (Num.GetValue <= 99)) then 
    Result := true;
end;


end.

объясните, за что тут отвечают классы? не могу понять. и что такое:

function Numeric.GetValue: byte;//ОДНО ЧИСЛО
begin
  Result := Value;
end;

Заранее благодарен.

[TaLadno]

Бросай, ну не твое оно, вообще.

Пробуй что ли читать, а потом спрашивать
Да хоть тут почитай - http://www.pascal.helpov.net/index/o...al_programming

[Stilet]

за что тут отвечают классы?

За группировку в себя функций для работы с тем, что преподаватель задал.
А там видимо разложение чисел в цифры, расчет суммы