pascal 自定義排序

2021-09-27 05:55:40 字數 719 閱讀 8363

program test07;

var f:text;

i,a,b,c,max:integer;

begin

assign(f,'test.txt');

rewrite(f);

randomize;

//生成三個隨機數

for i:=1 to 3 do

begin

writeln(f,random(100)); //生成0-100以內的整數

end;

close(f);

//讀取生成的隨機數.

assign(f,'test.txt');

reset(f);

read(f,a,b,c);//直接將f中的所有隨機數(3個)讀到變數中.

writeln(a,b,c);

readln;

close(f);

//對讀取的隨機數進行排序

if a>b then

begin

max:=a;

endelse

begin

max:=b;

end;

if c>max then

begin

max:=c;

end;

writeln(utf8decode('最大值為'),max);

readln;

end.

DataGridView自定義排序

net自帶datagridview排序貌似最終都是用datagridview.sort 發現當是用排序後,datagridview將把排序前的行樣式等重置,仔細測試後覺得貌似是排序時datagridview重新繫結了資料來源,具體不得而知.實在沒有辦法破解,我也不想重新寫比較來排序,用了最土的辦法,...

QTableWidget 自定義排序

qtablewidget功能強大,可以在每個格仔裡新增自己的wiget部件。如果想對這些自己新增的widget進行排序有兩種方法。一種是直接設定每個格仔對應的qtablewidgetitem的值,因為qtablewidget預設是據qtablewidgetitem來排序,呼叫的比較函式是 bool ...

python list 自定義排序

看到的乙個知識點,稍加記錄 a 希望將上述的list排序,按照每條記錄中的 score 排序。如果 score 欄位的值相等,則按照 first 的值排序。如果 first 依舊相等,則按照 second 排序。如果 second 相等,則按照 third 欄位的值來排序。a.sort.doc l....