Создать класс Pair

[izzie]

Добрый день, господа, помогите, пожалуйста с курсовой. Нужно написать программу на Delphi, а я в этом не гений...

Создать класс Pair (пара целых чисел); определить методы изменения полей и операцию сложения
пар (а, b) + (с, d) = (а + b, с + d). Определить класс-наследник Long с полями: старшая часть числа и
младшая часть числа. Переопределить операцию сложения и определить методы умножения и вычитания.

P.S. можете помочь хотя бы разобраться в задании, например «определить методы изменения полей»

[Sibedir]

С наследником не понял

старшая часть числа и младшая часть числа

Какого числа? У меня в голове сразу несколько представлеий об отом классе. Поконкретнее, поконкретнее...

На счет Pair:

  TPair = class;

  TPair = class
  private
    FValue1: Integer;
    FValue2: Integer;
  protected
  public
    procedure Plus (APair: TPair);
    procedure Assign (APair: TPair);
    function AsString: String;

    property Value1: Integer read FValue1 write FValue1;
    property Value2: Integer read FValue2 write FValue2;
  end;

...

procedure TPair.Assign(APair: TPair);
begin
  if APair <> nil then begin
    FValue1 := APair.Value1;
    FValue2 := APair.Value2;
  end;
end;

function TPair.AsString: String;
begin
  Result := '(' + IntToStr(FValue1) + ', ' + IntToStr(FValue2) + ')';
end;

procedure TPair.Plus(APair: TPair);
begin
  if APair <> nil then begin
    FValue1 := FValue1 + APair.Value1;
    FValue2 := FValue2 + APair.Value2;
  end;
end;

[Utkin]

Сообщение от izzie

Добрый день, господа, помогите, пожалуйста с курсовой. Нужно написать программу на Delphi, а я в этом не гений...

Увы среди нас таких практически нету ...

P.S. можете помочь хотя бы разобраться в задании, например «определить методы изменения полей»

Половина заданий построена специально таким образом, чтобы запутать решающего. В классе процедуры и функции называются методами

старшая часть числа и
младшая часть числа

Наверно FValue1 - старшая часть числа. Fvalue2 - младшая часть числа

Переопределить операцию сложения

С использованием перегрузки стандартной операции сложения или без?

[Sibedir]

Наверно FValue1 - старшая часть числа. Fvalue2 - младшая часть числа

Тогда не понятно чем Long отличается от Pair.

Половина заданий построена специально таким образом, чтобы запутать решающего

Вот уж точно

[izzie]

Половина заданий построена специально таким образом, чтобы запутать решающего

ага, запутали капитально.

P.S. специально для модераторов, случайно было создана тема в двух разделах сразу (не ругайте), вторая была в разделе для студентов, только хотел удалить эту, как тут ответы появились. в следующий раз буду внимательнее

спасибо. что помогаете, с вами лучше получается справится с заданием

[Sibedir]

Ну так как на счет наследника Long. Можешь пояснить чё эт такое и с чем его едят?

[izzie]

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

[Sibedir]

Сделай проще. Пойди завтра к преподавателю и скажи:
- Виньямин Анподистович, так мол и так, сделал половину задания, написал этот самый TPair. А вот что за Long никак в толк не возьму. Поясните, пожалуйста (тут изображаем безсилие и покорность).
Любой адекватный преподаватель, если он конечно не видел этой темы и не в курсе, что вам помогали (это бы его разозлило), видя стремление студента, на генетическом уровне захочет покровительствовать, а значит и помогать, последнему. Завтра нам отпишитесь, что же это за Long такой.

[izzie]

ок, попробую поразбираться еще, но скорее всего последую вашему совету)