Auf einen standartisierten Wert aufrunden

[rebellpk]

Sorry, dafür muss ich aber erstmal laufen lernen...

Ich kenn mich noch nicht so gut mit Delphi aus.

Ich stelle mir das so vor:

Delphi-Quellcode:

var
StdWidst: array [0..23] of integer;
   StdWidst[0] = 10;
   StdWidst[1] = 11;
   StdWidst[2] = 12;
   StdWidst[3] = 13;
   StdWidst[4] = 15;
   StdWidst[5] = 16;
   StdWidst[6] = 18;
   StdWidst[7] = 20;
   StdWidst[8] = 22;
   StdWidst[9] = 24;
   StdWidst[10] = 27;
   StdWidst[11] = 30;
   StdWidst[12] = 33;
   StdWidst[13] = 36;
   StdWidst[14] = 39;
   StdWidst[15] = 43;
   StdWidst[16] = 47;
   StdWidst[17] = 51;
   StdWidst[18] = 56;
   StdWidst[19] = 62;
   StdWidst[20] = 68;
   StdWidst[21] = 75;
   StdWidst[22] = 82;
   StdWidst[23] = 91;

Weiß echt nicht wie ich das angehen soll...