Code:
...
var br1,br2:integer;
begin
br1:=10;
br2:=5;
if br1>br2 then writeln('Br1 je veci od br2');
{ako je br1 veci od br2 onda ispise "br1 je veci od br2"}
Code:
...
var br1,br2:integer;
begin
br1:=10;
br2:=5;
if br1=br2 then writeln('Br1 i br2 su jednaki!') else
{ako je br1 jednak br2 onda ispisi "br1 i br2 su jednaki", a ako nisu (else), radi se ovaj kod izmedju BEGIN i END koji slijede}
begin
if br1>br2 then writeln('Br1 je veci od br2!') else
{ako je br1 veci od br2 ispisi "br1 je veci od br2", a ako nije ispisi "br2 je veci od br1"}
writeln('Br2 je veci od br1!');
end;
A izmedju IF i THEN mozes koristit i AND,OR,XOR logicke operacije..
Code:
var br1,br2:integer;
begin
br1:=5;
br2:=10;
if (br1>0) and (br1<10) then writeln('Br1 se nalazi u rasponu od 0 do 10!');
{ako je br1 veci od nule i ako je br1 manji od 10 ispisi "....", znaci moraju bit oba uvjeta zadovoljena, ako umjesto AND stavis OR onda moze biti samo jedan zadovoljen, a ako su obadva i onda ce radit, dok ce XOR radit kolko mi se cini ako je samo jedan od njih zadovoljen, znaci ako su oba zadovoljena XOR nece radit, i ako nije ni jedan zadovoljen XOR nece radit, znaci mora biti ili jedan ili drugi (nisam najsigurniji za ovaj XOR, provjeri jos)}
itd
[Ovu poruku je menjao Passwd dana 13.01.2006. u 09:15 GMT+1]