Deutsches Lazarusforum

X_ster

Hey,
ich hab das problem, dass die funktion

function m (n :int64) :int64;
var
r,q,p: int64;
 
begin
 q := 2;
 p := (q**(n-1));
 r:= p mod n;
 Result := r;
end;

mit höheren zahlen überlastet wird. leider unterstützt mod kein real, single oder double.
Gibt es da auch eineandere Lösung??

X_ster

Danke hat geklappt :3

X_ster

Versuch:

type returnarray = array of int64;

function primarray (fermat: array of int64) :returnarray;

fermat ist ja ein Parameter, du musst aber auch einen Returnwert (in diesem Fall ein Array) festlegen. Das Returnarray wird dann im type definiert.

Funktioniert leider auch nicht ...

X_ster

ich habe jetzt zwar

Code: Alles auswählen

type fermat= array of int64;

gemacht aber ergibt mir immernoch

unit1.pas(69,11) Error: Incompatible types: got "Open Array Of Int64" expected "Int64"

zurück.

X_ster

Das hab ich auch schon probiert aber wenn ich
function primarray (fermat: array of int64) :array of int64;
oder
function primarray (fermat: array of int64) :fermat;

mach dann wirft der mir die Fehlermeldung:

unit1.pas(58,46) Error: Type identifier expected
unit1.pas(58,46) Fatal: Syntax error ...

X_ster

Hallo erstmal,
ich habe leider ein kleines Problem mit einer Funktion, und zwar wird mein Array of int 64 nicht als Rückgabewert akzeptiert.

Hier der Code:

function primarray (fermat: array of int64) :int64;
var
c,d : int64;
j :integer;
begin
c := high(fermat) - low(fermat);
for j:=0 to c do ...

Deutsches Lazarusforum

Die Suche ergab 6 Treffer

Modulus überlastet

Re: Funktion akzeptiert Array nicht als Result

Re: Funktion akzeptiert Array nicht als Result

Re: Funktion akzeptiert Array nicht als Result

Re: Funktion akzeptiert Array nicht als Result

[Gelöst]Funktion akzeptiert Array nicht als Result