Pascal: Nizovi (Arrays)

Nizovi su, kako im samo ime govori, elementi u programiranju koji sadrze sredjeni niz podataka. To mogu biti brojevi, stringovi, bajtovi itd. Nizovi se definisu u var bloku a zatim inicijalizuju pre koriscenja, tako sto se ispunjavaju nekim standardnim podacima. Elementima niza se pristupa pomocu rednog broja. Ovo vazi i za citanje i za pisanje. Pogledajmo sada sve ovo u praksi.

program Nizovi;
uses
crt;

var
n:integer;
//definisanje niza
a:array[1..10] of Integer;

begin
//inicijalizacija
for n := 1 to 10 do
//punimo niz brojevima
a[n] := n*n;
//citamo redne brojeve 2 i 7
writeln('Na broju 2 je ',a[2]);
writeln('Na broju 7 je ',a[7]);
readln;
clrscr;
//upisujemo 30 na mesto broj 5
a[5] := 30;
//citamo sve brojeve
for n in a do
writeln('Na broju ',round(sqrt(n)), ' je vrednost: ',n);
readln;
end.

Napomena: Ovaj program nece raditi u Dev-Pascalu zato sto on koristi verziju FPC kompajlera u kojoj ne postoji podrska za For/In strukturu. Mozete ga probati u Lazarusu, jer je podrska za ovo dodata od FPC v2.4.2. Ako insistirate na Dev-Pascal IDEu isti efekat cete dobiti ako poslednjih pet redova napisete ovako:

//citamo sve brojeve
for n := 1 to 10 do
writeln('Na broju ',n, ' je vrednost: ',a[n]);
readln;
end.

Da podsetimo, u Lazarusu ovakve programe mozete kreirati sa Project > New Project > Simple Program ili Program. Za nase potrebe preporucljiva je prva opcija.

Pogledajmo sta nas program radi. Najpre definisemo sam niz u var bloku. Zatim ga punimo brojevima tako sto na svako mesto u nizu stavljamo kvadrat rednog broja elementa. Nakon toga ocitavamo vrednost na dva mesta, da bi se uverili sta se tu nalazi. Zatim upisujemo drugaciju vrednost na mestu broj 5 (gde se nalazi 25 kao kvadrat rednog broja). I na kraju iscitavamo sve vrednosti po redu, kao demonstraciju For/In strukture. Da bi simulirali redne brojeve koristimo zaokruzivanje korena vrednosti na tom mestu. Drugi nacin da se uradi ista stvar objasnjen je u delu napomene.

Vise o nizovima mozete pogledati ovde.

Posted on 2016/03/13, in Pascal, Programski jezici, Tutorijali. Bookmark the permalink. 2 Comments.

  1. Hvala windu!!!

    Like

Leave a Reply

Fill in your details below or click an icon to log in:

WordPress.com Logo

You are commenting using your WordPress.com account. Log Out / Change )

Twitter picture

You are commenting using your Twitter account. Log Out / Change )

Facebook photo

You are commenting using your Facebook account. Log Out / Change )

Google+ photo

You are commenting using your Google+ account. Log Out / Change )

Connecting to %s

%d bloggers like this: