SG Fórum - Maple - #603

SG Fórum - Maple - #603

Fórum / Felhasználói programok

GImre70 2014. ápr. 29. 11:12 | válasz | #603
Sziasztok.

OP:=proc(A,B,p,q)

local M, x,y;

x:=(HorizontalCoord(A)*q+HorizontalCoord(B)*p)/(p+q);

y:=(VerticalCoord(A)*q+VerticalCoord(B)*p)+(p+q);

point(M,x,y);

Return(M);

end proc;

Ez az eljárás két pont közti osztópontot számolja ki. Az ismert képlet alapján könnyû megírni.

Szóval azt szeretném kérdezni, hogy hogyan lehet az A, és a B paramétereknek a "point" típust adni, hogy ne kelljen külön leírni. valahogy így:

point(A,3,8);

point(B,10, 6);

OP(A, B, 2,1);

Hanem rögtön így:

OP(point(A, 3,8), point(B,10,6),2,1)

Az paraméterek a következõk:

A- az elsõ pont kordinátái

B- a második pont kordinátái

p, q - osztási arány.

Egyébként lehet saját típust deklarálni?

Elõre is köszönöm

Imre