[ Passwd @ 26.06.2005. 19:06 ] @
Kako napisat (sto jednostavnije) kod koji ce za unijet broj reci od koliko se taj broj (integer) sastoji znamenaka?
Znaci:

broj:309
znamenke:3


[ Danica Porobic @ 26.06.2005. 19:22 ] @
var
n,cif:integer;
begin
readln(n);
cif:=0;
while n>0 do
begin
n:=n div 10;
cif:=cif+1
end;
writeln(cif)
end.
[ Toyo @ 26.06.2005. 19:30 ] @
He he jos se mucis sa onim programom...

Code:

var s: string;
  broj, znakova: integer;
begin
   str(broj, S);
   znakova := length(s);
end. 
[ stameni @ 27.06.2005. 12:38 ] @
Dužina *prirodnog* broja n može se naći iz formule:


len(n) = trunc(log10(n)) + 1


log10 može se izračunati preko prirodnog logaritma.