[es] - Evo jos jednog lakog (za nekog)

bokisan
Bojan Miljevic
Srbija

Član broj: 1038
Poruke: 56
*.InfoSky.Net

ICQ: 138726343
Sajt: ww1.infosky.net/~bokisan

Profil

Evo jos jednog lakog (za nekog)

^{16.01.2002. u 19:33}

Napisati program kojim se ispisuje ukupan broj svih cetvorocifrenih brojeva kod kojih je zbir cifara na parnim mestima jednak zbiru cifara na neparnim mestima i ispisati t brojeve. HVALA

^{16.01.2002. u 19:33}

dr_voja
Milošević Vojislav
Beograd

Član broj: 2066
Poruke: 69
*.92.EUnet.yu

ICQ: 54318972

Profil

Re: Evo jos jednog lakog (za nekog)

^{16.01.2002. u 20:12}

Moj predlog je da formiras 4-cifrene brojeve sa 4 for-do petlje, recimo
for a:=0 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
for d:=0 to 9 do
If ((a+c)=(b+d))
then writeln(1000*a+100*b+10*c+d);
ovde treba ubaciti i brojac, ali me mrzi da pisem naredbu sastavljanja

"Staromislitelji ne trbuhosećaju englsoc"

^{16.01.2002. u 20:12}

Boris Stevanovic
Srbija

Član broj: 1265
Poruke: 120
*.ptt.yu

Profil

Re: Evo jos jednog lakog (za nekog)

^{16.01.2002. u 22:41}

Citat:

dr_voja:
Moj predlog je da formiras 4-cifrene brojeve sa 4 for-do petlje, recimo
for a:=0 to 9 do
for b:=0 to 9 do
for c:=0 to 9 do
for d:=0 to 9 do
If ((a+c)=(b+d))
then writeln(1000*a+100*b+10*c+d);
ovde treba ubaciti i brojac, ali me mrzi da pisem naredbu sastavljanja

Samo mala izmena :)
treba:
for a:=1 to 9 do {i tako dalje}

Samo ne znam koja je svrha ovog programa.
Da nisi mozda mislio na proizvoljno unete cetvorocifrene brojeve pa broj svih takvih koji ispunjavaju zadati uslov ?

^{16.01.2002. u 22:41}

bokisan
Bojan Miljevic
Srbija

Član broj: 1038
Poruke: 56
*.InfoSky.Net

ICQ: 138726343
Sajt: ww1.infosky.net/~bokisan

Profil

Re: Evo jos jednog lakog (za nekog)

^{17.01.2002. u 18:01}

Citat:

UH!!! Ajde molim te polako od pocetka i jednostavnije. Ja tek pocinjem sa ovim (sto me muka - skola tera).

^{17.01.2002. u 18:01}

bokisan
Bojan Miljevic
Srbija

Član broj: 1038
Poruke: 56
*.InfoSky.Net

ICQ: 138726343
Sajt: ww1.infosky.net/~bokisan

Profil

Re: Evo jos jednog lakog (za nekog)

^{17.01.2002. u 18:08}

Citat:

Samo ne znam koja je svrha ovog programa.
Da nisi mozda mislio na proizvoljno unete cetvorocifrene brojeve pa broj svih takvih koji ispunjavaju zadati uslov ?

Ne nego za sve cetvorocifrene brojeve...

^{17.01.2002. u 18:08}

shaDy
Nikola J
-=BGD=-

Član broj: 1507
Poruke: 240
*.ppp-bg.sezampro.yu

Sajt: www.CikloBerza.com

Profil

Re: Evo jos jednog lakog (za nekog)

^{17.01.2002. u 18:31}

Koja si skola?

kupi zbirku sa resenim zadacima.

www.cikloberza.com --- www.freeclimbing.org.yu --- www.vertikal.org.yu --- www.yuzvuk.com

^{17.01.2002. u 18:31}

Dusan Marjanovic
Consultant, SAS
Beograd

Član broj: 59
Poruke: 1289
*.016le.net

Jabber: dusanm@gmail.com
ICQ: 84621598
Sajt: marjanovic.net

Profil

Re: Evo jos jednog lakog (za nekog)

^{17.01.2002. u 21:15}

pa ne znam šta ti je više potrebno...ako si nekad pisao u pascalu ovo bi trebalo da ti je dovoljno...
program shit;
var
a,b,c,d,i:integer;
begin
i:=0; { broj 4-cifrenih brojeva koji ispunjavaju dati uslov }
for a:=1 to 9 do
for b:=1 to 9 do
for c:=1 to 9 do
for d:=1 to 9 do
If ((a+c)=(b+d)) {uporedjuje zbir cifara na parnim sa zbirom cifara na neparnim mestima }
then
begin
i:=i+1;
writeln(1000*a+100*b+10*c+d)
end;
writeln('Takvih brojeva ima: ',i)
end.
sledeći put probaj da malo sam razmisliš a ne da tražiš sve gotovo...

VMware VCP/Microsoft MCSE 2003/HP ASE

^{17.01.2002. u 21:15}

bokisan
Bojan Miljevic
Srbija

Član broj: 1038
Poruke: 56
*.InfoSky.Net

ICQ: 138726343
Sajt: ww1.infosky.net/~bokisan

Profil

Re: Evo jos jednog lakog (za nekog)

^{19.01.2002. u 12:21}

Citat:

shaDy:
Koja si skola?

Deveta gimnazija :)

^{19.01.2002. u 12:21}

Makojdis
Stefanovic Milos
Kragujevac

Član broj: 78
Poruke: 302
*.ptt.yu

Profil

Re: Evo jos jednog lakog (za nekog)

^{20.01.2002. u 11:02}

Imas dostadobrih knjiga za pascal

vecina profesora radi po zbirkama Milana Cabarkape
Zbirka resenih zadataka u paskalu ima dve knjige koje su prilicno dobre...probaj to da nabavis i na konju si

^{20.01.2002. u 11:02}

Ivan Tanasic
BGD-SRBIJA

Član broj: 220
Poruke: 965
*.verat.net

Jabber: Autoexes@jabber.sk
ICQ: 129145438

Profil

Re: Evo jos jednog lakog (za nekog)

^{23.01.2002. u 17:20}

Citat:

Makojdis:
Imas dostadobrih knjiga za pascal

vecina profesora radi po zbirkama Milana Cabarkape
Zbirka resenih zadataka u paskalu ima dve knjige koje su prilicno dobre...probaj to da nabavis i na konju si

Neee, nedovoljno, zadatci su nikakvi (kao i resenja).

Kako stvari stoje sa pascal za srednju skolu:
Uglavnom se uci iz pascal 1 i pascal 2 knjiga od Milana Cabarkape (u mojoj skoli za 1. i 2. godinu su te dve knjige), onda Metodicka zbirka zadataka sa resenjima u pascal by Nevenka Spalevic & Milan Cabarkapa (isto u mojoj skoli obavezno za imati) i programiranje&programiranje podeblja zbirka Milana Vugdelije koja je na nekom srednjem/visem/takmicarskom nivou (kolko sam ja razumeo, ne mojte me drzati za rec) al uz ovo si vec na konju. Naravno ima tu jos gomila zbirki, ako ti treba vise informacija nabavicu ti ime/ime autora

Ivan Tanasic - Autoexes

>cd pub
>more beer

^{23.01.2002. u 17:20}

Ivan Tanasic
BGD-SRBIJA

Član broj: 220
Poruke: 965
*.verat.net

Jabber: Autoexes@jabber.sk
ICQ: 129145438

Profil

Re: Evo jos jednog lakog (za nekog)

^{24.01.2002. u 12:59}

E da sad se setih jos jedne knjige... osnove programiranja, radi se na pmf, i o pascalu je. Ima dosta primera cinimi se da je i ona lepo uradjena.

Ivan Tanasic - Autoexes

>cd pub
>more beer

^{24.01.2002. u 12:59}

prosams
Novi Beograd

Član broj: 716
Poruke: 133
*.verat.net

Profil

Re: Evo jos jednog lakog (za nekog)

^{28.02.2002. u 06:37}

A imali knjiga u slobodnoj prodaji u nekoj knjižari, ili postoji neko alternativno rešenje za nabavku.

Zlo ne postoji, već samo je dobro prisutno u maloj količini.

^{28.02.2002. u 06:37}

Riste Pejov
Team Leader/Senior Software Developer @
Ein-Sof ltd Skopje
Skopje, Macedonia

Član broj: 128
Poruke: 571
62.220.202.*

Jabber: richie@bagra.net.mk
ICQ: 154236769
Sajt: riste.softver.org.mk

Profil

Re: Evo jos jednog lakog (za nekog)

^{01.03.2002. u 00:14}

Kad smo kod knjiga o paskalu,
ima jednu genijalnu knjigu
zove se:
Introduction to Computer Science (an algorithmic aproach)
Pascal Edition

Autori:
Tremblay, DeDourek, Bunt

to je najkompletnija i najbolja knjiga koju ja video o paskalu,
ja sam se edva docepa kopije.

People who think they know everything tend to irritate those of us who do.

^{01.03.2002. u 00:14}

Toni
Dorćol, Beograd

SuperModerator
Član broj: 15
Poruke: 653
*.verat.net

Jabber: toni@elitesecurity.org
ICQ: 16451419
Sajt: egoideas.com

Profil

Re: Evo jos jednog lakog (za nekog)

^{01.03.2002. u 09:28}

Milana Cabarkape
Nevenka Spalevic
Milana Vugdelije

a zamisli akciju kada su ti svi istovremeno na BLOKu ;)
a ko hoce knjigu za takmiichenje onda neka uzme zbirku sa Informatickih olimpiada od Jozefa Kratice :)

to su takve bahanalije od algoritama i stvari da bi se smrzli :)

Jel potpis treba pisanim ili štampanim slovima?
_________________________________________
dizajnzona.com
netizenfaction.com
egoideas.com
levodesno.com

^{01.03.2002. u 09:28}