SVP qui peut m'aider à corriger ce programme ? Et merci

program tri_tab;
uses wincrt;
type
tableau= array[1..100]of integer;
var
T:tableau;
i,n,j:integer;
begin