Zitat von
vsilverlord:
ach ja, die funktion mutiere hat ja nur den parameter tviech: [vereinfacht, aber im prinzip das gleiche]
Delphi-Quellcode:
procedure mutiere(viech:tviech):tviech;
begin
result.länge:=viech.länge+random(5);
result.haare:=viech.haare+random(5);
end;
Jetzt hast du aber gemogelt: eine procedure hat normalerweise keinen Rückgabewert!