Iskalni zadetki

j:=1 to n do begin h[i,j]:=0; end; h[xz,yz]:=1; try(2,xz,yz,q); if q then izpis else writeln('Ni rešitve!'); end; end. Hamiltonov problem Weisstein, Eric...

ugotavljanje parnosti, npr. v paskalu odd(n) if odd(n) then liho else sodo sicer pa se izračuna ostanek pri deljenju z dva if n mod 2 = 0 then sodo else liho ....

DeliInVladaj(a, dno, vrh, rešitev) begin if problem majhen (dno, vrh) then resi (a, dno, vrh, rešitev) else begin // problem ni majhen, potrebna delitev...

2) // 1.veja min vpetega drevesa for i:= 1 to n do begin if c[i,l] < c[i,k] then r[i] := l else r[i] := k r[k], r[l] := 0 for i:= 2 to n-1 do begin // poišči...

Tausworthe dodaja trem kanoničnim Böhm-Jacopinijeve strukturam: SEQUENCE, IF-THEN-ELSE in WHILE-DO, še dve: DO-WHILE in CASE. Dodatna prednost strukturiranega...

sicer pa jo lahko enostavno sprogramiramo (zgled v pascalu): function abs(a:integer):integer; begin if (a >= 0) then abs := a else abs := -a; end; p p u...

repeat if v[i] > prostor then exit (repeat) else begin x[i] := 1 // i-ti predmed se gre v nahrbtnik prostor := prostor - v[i] end i:= i + 1 until i>n if i<=n...

begin if a[j] and b[i+j] and c[i-j] then begin x[i] := j; a[j] := false; b[i+j] := false; c[i-j] := false; if i<8 then {rekurzivni klic} try(i+1) else begin...

prepišemo neposredno : function F(n:integer):integer; begin if (n=0) or (n=1) then F := 1 else F := F(n-1) + F(n-2); end;{F} Vendar je taka neposredna uporaba...

Hanoi(n: integer; from, to, by: char); Begin if (n=1) then writeln('Move the plate from ', from, ' to ', to) else begin Hanoi(n-1, from, by, to); Hanoi(1,...

% 8 if r == 3 or r == 5 then t = -t end end n, k = k, n if n % 4 == 3 and k % 4 == 3 then t = -t end n = n % k end if k == 1 then return t else return...

Uporabniki lahko določijo svoje lastne makroje. Na razpolago so zanke in if-then-else jezikovni konstrukti, kar določa TeX kot popolni jezik po Turingu. Sistem...

living in homes without enough to survive, that's a blatant failure. What else could you describe it as? [. . .] It all comes down to whether or not you...

Vrtičkar, Metka Baletka, 100 pijanih idej The Tide Decline The Toronto Drug Bust If You Were Mine Toxic Heart Ride Your Life Tulio Furlanič Nocoj joče neko srce...