% Dados a serem fornecidos pelo 
% usuario: num, base, ndig
%clear;
pe = floor(num);
pf = num - pe;
i = 1;
while (pe ~= 0)
  quo = floor(pe/base);
  rest = pe - quo*base;
  de(i) = rest;
  i = i + 1;
  pe = quo;
end
for i=1:ndig
  aux = pf*base;
  df(i) = floor(aux);
  m = aux - df(i);
  pf = m;
end