CPU krævende program

mere seriøst:
var
....i: integer;
....r,r1: extended; //19-20 ciffre = mest krævende for cpu
begin
...r1:=123456789.123456789; //sikre komplexibilitet (?)
for i:=1 to 1000000 do begin //evt repeat ... until key='q' ell. lign.
...r:=10.0/r1; //vil bruge floating point division som er uhyre tidskrævende
end;

Hvis du vil bruge en masse cpu kan du bare lave en uendelig løkke....

Kan du fortælle mere, f.eks. hvordan og hvilke funktioner, jeg kan bruge?

Den 08-08-02 19:54 skrev Allan Iversen følgende:
-----------------------------------------------------------------------------
Kan du fortælle mere, f.eks. hvordan og hvilke funktioner, jeg kan bruge?
-----------------------------------------------------------------------------

var x : byte;
begin
x := 2;
repeat
//noget
until x = 1;
end;

øhhh... ?

repeat until false;

mere seriøst:
var
....i: integer;
....r,r1: extended; //19-20 ciffre = mest krævende for cpu
begin
...r1:=123456789.123456789; //sikre komplexibilitet (?)
for i:=1 to 1000000 do begin //evt repeat ... until key='q' ell. lign.
...r:=10.0/r1; //vil bruge floating point division som er uhyre tidskrævende
end;

Brug Variant i stedet for extended, det er endnu mere CPU-krævende.

Emil Melgaard
emil.melgaard@private.dk