만약 23.4567을 넣어서 가수 자릿수를 구하려고 합니다...
그런데...자릿수가 26, 46 이렇게 나오는데....올바로 처리할수 있는
방법이 없을 까요...
(꼭 frac()함수를 안쓰도 되거든요...^^)
var
num, inReal : real;
digit : integer
bein
readln(num);
inReal := frac(num);
while inReal <> 0 do
begin
inReal := frac(inReal*10);
digit := digit +1;
end;
writeln(digit);
readln;
end.
위의 예가 아니더라도 가수부분자릿수를 10으로 나누어서 가져올수 있으면
좋겠는데....제가 너무 어려운 질문을 했나요?????
답변을 부탁드립니다.......