|
Napisano: 28 Maj 2012 14:29
Program Niz_While;
uses crt;
var niz: array [1..10] of integer;
a,b:integer;
begin
writeln('Popunite niz:');
a:=1;
while (a<=10) do begin
writeln ('clan niza [',a,']');
readln (niz[a]);
a:=a+1;
end;
writeln('Uneti niz je:');
for a:=1 to 10 do begin
writeln (niz[a]);
end;
readln;
end.
Dopuna: 28 Maj 2012 14:37
Najbolje se uci na primeru ovde imas objedinjenu while petlju i nizove. Zadatak bi glasio ovako: popuiti niz od 10 celih brojeva koristeci while petlju. A zatim ga ispisati pomocu for petlje (ona je samo laksi nacin zapsivanja while petlje).
Nizovi se popunjavaju koristeci petlje, najcesce for, ali zbog potrebe objasnjenja while petlje koristimo while.
Za while petlju moramo da imamo deklarisanu promenljivu i dodeljenu vrednost (u ovom slucaju a:=1 . Dok kod for petlje se to lakse zapisuje for a:=1 to 10 do begin sav uslov se nalazi u petlji. Ako treba da se nesta objasni pitaj.
Dopuna: 28 Maj 2012 14:48
for petlja automatski povecava za 1 tako da ne moramo da pisemo a:=a+1; to pomaze u smanjivnaju koda
|
