[freedomman]

при

Код:

   if (strtofloat(StringGrid1.Cells[i,j])=pr) then
         begin
          result:=strtofloat(StringGrid1.Cells[i,1])+strtofloat(StringGrid1.Cells[1,j]);
         
        end

strtofloat(StringGrid1.Cells[i,j])=3,12 и pr=3,12 ,а в условие не заходит