Kako napisat (sto jednostavnije) kod koji ce za unijet broj reci od koliko se taj broj (integer) sastoji znamenaka?
Znaci:
broj:309
znamenke:3
Znaci:
broj:309
znamenke:3
Jednostavno pitanje u tp????
Zaključano
Zakačeno
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.
n,cif:integer;
begin
readln(n);
cif:=0;
while n>0 do
begin
n:=n div 10;
cif:=cif+1
end;
writeln(cif)
end.
He he jos se mucis sa onim programom...
Code:
var s: string;
broj, znakova: integer;
begin
str(broj, S);
znakova := length(s);
end.
var s: string;
broj, znakova: integer;
begin
str(broj, S);
znakova := length(s);
end.
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.
len(n) = trunc(log10(n)) + 1
log10 može se izračunati preko prirodnog logaritma.