Pascal Programiranje

w-ice87 · Početnik Domaćeg.de

Ovu temu otvaram kako bih prosirio svoje znanje u oblasti programiranja u Pascal-u i podeli svoja znanja sa vama. Ja koristim PASCAL 5.5. Tek sam pocetnik u ovome tako da bi mi trebala vasa pomoc.

Interesuje me kako bih mogao da napravim program koji bi ispisao rezultat sabiranja brojeva u nizu na primer od 1 do 10. Znam da treba da koristim FOR komandu ali mi ne ide. Ja sam moj program napisao ovako:

var
i,a:integer;
begin
for i:=1 to 10 do
a:=a+i;
writeln('i=',i);
writeln('a=',a);
a:=0;
readln;
end.

Ako neko moze da mi pomogne bio bi mu zahvalan!
Takodje pitajte i mene za neke zadatke mozda mogu da vam pomognem iako sam tek pocetnik! Makar za ideju.

Hvala

KZS · Upućeni član

Trebao bi imati i brojac u tom programu koji ce ti brojati brojeve od 1 do 10 pronadji u nekoj knjizi od paskala informacije o brojacu.

XeXeX · Početnik Domaćeg.de

ako mislis suma od 1 do 10 onda: (neradim odavno u Pascalu preporucujem ti da predjes na C)

var
i,a:integer;
begin
a:=0;
for i:=1 to 10 do
a:=a+i;
writeln('a=',a);
readln;
end.

tako bi trebalo (to ti je ideja). Sta ti je ono a:=0 radilo na kraju programa. mogao si to uraditi i sa "while" i sa "do until"

dziger · Početnik Domaćeg.de

Ideja:
Samo zato sto si na pocetku ja bi ti preporucio da se prebacis na Delphi ako hoces da nastavis sa paskal okolinom, ali moj savet je da odes na C++, koji me malo mocniji jezik i najeksplatiraniji jezik danas.

JrJr1 · Početnik Domaćeg.de

Neka covek nauci da pliva u Pascalu, pa ce posle lako da se uklopi u OOP okruzenje....

yeki · Dobro upućeni član

Ma sto da se muci sa nekim jezikom koji je koriscen 60-70 godina.Predji na c# ili javu.

vdjuric · Početnik Domaćeg.de

A nek mi neko objasni zasto ste i jedan i drugi stavili ono readln na kraju...

Iwan · Upućeni član

Moja preporuka ti je ista predji na c ili na javu . A sto se tice paskala nemogu ti pomoci , osim sto imam neke folije sa pascal zadacima i sa resenjima, posto smo ga ucili nekad, samo sto ga ja nisam naucio:) pa ako si zainteresovan mozda bi mogo da skeniram i da ti postavim ovde negde (samo sto su folije na nemackom)

danijelns · Početnik Domaćeg.de

Treba ti a:=0 na pocetku inace ne zna kako poceti. Readln na kraju je da bi se prebacio u novi red i nista vise. I ne treba ti ono writeln ('i=',i).

vdjuric · Početnik Domaćeg.de

Pa normalno da treba writeln, mora mu nekad negde ispisati rezultat...

hoho · Odomaćeni član

w-ice87 · Početnik Domaćeg.de

Nisam najbolje objasnio sta mi tacno treba.
Treba od prilike da izgleda ovako:
a=1+2+3+4+5+6+7+8+9+10=55

Inace ono za while je istina da moze da se stavi, ali sam ja stavio "a:=0"
da bi mi uvek nulirao "a" posto bi nastavljao od zbira "55"!

A readln sam stavio zbog toga da ne moram uvek da idem na RUN pa na USER SCREEN, vec je dosta samo CTRL+F9 i odmah se pokrece!