Código Delphi [-] var i: integer; begin if TryStrToInt(reseq1.text,i) then resul[c,j]:= i; end,
var i: integer; begin if TryStrToInt(reseq1.text,i) then resul[c,j]:= i; end,