Lord_Don
Зарегистрирован: 28.01.2008 Сообщения: 4
|
Добавлено: Пн Мар 03 2008 10:04 Заголовок сообщения: Классы в Delphi |
|
|
Составить описание класса для объектов - векторов, задаваемых координатами концов в трехмерно пространстве. Обеспечить операции сложения и вычитания векторов получением вектора (суммы или разности).
type
Vector = class
x,y,z:real;
function Sloz(a,b:vector):vector;
end;
function Vector.Sloz(a,b:vector):vector;
begin
result.x:=a.x+b.x;
result.y:=a.y+b.y;
result.z:=a.z+b.z;
end;
у меня не получается вызвать эту функцию  |
|