Pascalprogramm

[mkinzler]

Delphi-Quellcode:

function Kreuz(a,b: Vektor): Vektor;
...

Aufruf:
c := Kreuz( a, b);