Follow us on Twitter!
It is never to LATE to become what you never WERE.
Thursday, April 17, 2014
Navigation
Home
HellBoundHackers Main:
HellBoundHackers Find:
HellBoundHackers Information:
Learn
Communicate
Submit
Shop
Challenges
HellBoundHackers Exploit:
HellBoundHackers Programming:
HellBoundHackers Think:
HellBoundHackers Track:
HellBoundHackers Patch:
HellBoundHackers Other:
HellBoundHackers Need Help?
Other
Members Online
Total Online: 19
Guests Online: 19
Members Online: 0

Registered Members: 82815
Newest Member: medjiking
Latest Articles
View Thread

HellBound Hackers | Computer General | Programming

Author

pascal hashing function


Member

Your avatar

Posts:
Location:
Joined: 01.01.70
Rank:
Guest
Posted on 20-05-10 07:40
[CODE]program Bevardė7;
const m = 1000;
type datarecord = record
k:string;
end;
mas = array [0..m-1] of datarecord ;
var n:integer;
a:mas;
//----------------------------------
procedure implement;
var i:integer;
begin
for i:=0 to m-1 do
a[i].k:='';
end;

//---------------------------------------------------------------------

//---------------------------------------------
function hashfunction (rakt:string):integer;
var b:integer;
begin
end;
//------------------------------------------------------------------------
procedure insert (reiksme:raktas;var a:mas);

//--------------------------------------------------------------------------
function search(reiksme:raktas;var a:mas):integer;

begin

Readln;
end.[/CODE]
okey, i have search and insert function can someone suggest hashfunction?