In[]:=
list={{1,38.58367},{2,95.837674},{3,84.183247},{4,20.286123}};
In[]:=
list〚All,2〛=NumberForm[#,3]&/@list〚All,2〛
Out[]=
{38.6,95.8,84.2,20.3}
In[]:=
Column@list
Out[]=
{1,38.6}
{2,95.8}
{3,84.2}
{4,20.3}