www.techinf1.fora.pl

tehran

skladnia:
if warunek 1 then akcja 1{jesli nastapi okreslony warunek to nastapi skutek
else {lub} czyli nasza (akcja 1)}
if warunek 2 then akcja 2 {jesli nastapi okreslony warunek to nastapi
else {lub} skutek (akcja 2) }
if warunek 3 then akcja 3 {jesli nastapi okreslony warunek to nastapi
else {lub} skutek(akcja 3)}
if warunek 4 then akcja 4 {jesli nastapi okreslony warunek to nastapi
itd. skutek(akcja 4)}

przyklad:
program pory roku;
var a:byte;
begin
writeln(podaj liczbe');
readln(a);
if a=1 then writeln('wiosna');{jesli a=1 to program napisze wiosna.}
else {lub}
if a=2 then writeln('lato'); {jesli a=2 to program napisze lato.}
else {lub}
if a=3 then writeln ('jesien'); {jesli a=3 to program napisze jesien}
else writeln ('zima'); {lub zima}
readln; {pokaze nam wynik swojej pracy}
end. {zakonczy program}