Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.

Jednostavno pitanje u tp????

[es] :: Pascal / Delphi / Kylix :: Jednostavno pitanje u tp????

[ Pregleda: 1440 | Odgovora: 3 ]

Postavi temu Odgovori

Autor

Pretraga teme: Traži
Markiranje Štampanje RSS

Passwd

Član broj: 54624
Poruke: 640
*.adsl.net.t-com.hr.



Profil

icon Jednostavno pitanje u tp????26.06.2005. u 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


26.06.2005. u 19:06 

Danica Porobic
Novi Sad

Član broj: 13847
Poruke: 28
212.200.5.*



Profil

icon Re: Jednostavno pitanje u tp????26.06.2005. u 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.
26.06.2005. u 19:22 

Toyo

Član broj: 45193
Poruke: 227
*.kovnet.co.yu.



Profil

icon Re: Jednostavno pitanje u tp????26.06.2005. u 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. 
26.06.2005. u 19:30 

stameni

Član broj: 6739
Poruke: 201
*.bg.wifi.vline.verat.net.



Profil

icon Re: Jednostavno pitanje u tp????27.06.2005. u 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.
27.06.2005. u 12:38 

[es] :: Pascal / Delphi / Kylix :: Jednostavno pitanje u tp????

[ Pregleda: 1440 | Odgovora: 3 ]

Postavi temu Odgovori

Navigacija
Lista poslednjih: 16, 32, 64, 128 poruka.