[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 - pre 270 meseci}

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

Odgovor na temu

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 - pre 270 meseci}

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"

Odgovor na temu

Boris Stevanovic
Srbija

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

Profil

Re: Evo jos jednog lakog (za nekog)

^{16.01.2002. u 22:41 - pre 270 meseci}

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 ?

Odgovor na temu

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 - pre 270 meseci}

Citat:

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

Odgovor na temu

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 - pre 270 meseci}

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...

Odgovor na temu

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 - pre 270 meseci}

Koja si skola?

kupi zbirku sa resenim zadacima.

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

Odgovor na temu

Dusan Marjanovic
Consultant, SAS
Beograd

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

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

+6 Profil

Re: Evo jos jednog lakog (za nekog)

^{17.01.2002. u 21:15 - pre 270 meseci}

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

Odgovor na temu

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 - pre 270 meseci}

Citat:

shaDy:
Koja si skola?

Deveta gimnazija :)

Odgovor na temu

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 - pre 270 meseci}

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

Odgovor na temu

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 - pre 270 meseci}

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

Odgovor na temu

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 - pre 270 meseci}

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

Odgovor na temu

prosams
Novi Beograd

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

Profil

Re: Evo jos jednog lakog (za nekog)

^{28.02.2002. u 06:37 - pre 269 meseci}

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.

Odgovor na temu

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 - pre 269 meseci}

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.

Odgovor na temu

Toni
Dorćol, Beograd

SuperModerator
Član broj: 15
Poruke: 655
*.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 - pre 269 meseci}

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?
___________________________________
______
[url=http://www.dizajnzona.com/foru
ms/]dizajnzona.com[/url]
[url=http://www.netizenfaction.com/
]netizenfaction.com[/url]
egoideas.
com
levodesn
o.com

Odgovor na temu