Dein Code hier:
Delphi-Quellcode:
for i := 1 to 5 do
begin
for j := 1 to 5 do
begin
if arr1[i] = arr2[j] then // Übrigens immer true, wenn i gleich j !
begin
v:=true;
end
else
begin
v:=false;
end;
end;
end;
Lässt sich ja zu dem hier vereinfachen:
v := arr1[5] = arr2[5];
Weil du v in jedem Durchlauf setzt, ist eigentlich nur der letzte Durchlauf relevant. Falls du wissen möchtest, ob es gleiche Element gibt, darfst du bei ungleichen Elementen das Ergebnis nicht überschreiben
