1. Instrukcja sterująca IF

Jeżeli mam zamiar w programie podejmować decyzje na podstawie spełnienia bądź, nie spełnienia warunku używamy w Pascalu instrukcji alternatywy. Jej ogólna postać wygląda następująco:

if jakiś warunek then

jakieś komendy;

Program:

program warunki;

var

liczba:integer;

begin

writeln('Podaj liczbe: ');

readln(liczba);

if liczba > 200 then

writeln('Podałeś liczbę większą niż 200')

else writeln('Podałeś liczbę równą lub mniejsza od 200');

end.

2. Instrukcja Case

Instrukcja Case jest wykorzystywana, gdy wykonanie różnych części programu jest uzależnione od stanu pewnej zmiennej. Jej ogólna postać wygląda następująco:

case wyrażenie of

sekwencja instrukcji wyboru

else

instrukcja

Program:

Program wybor;

uses

Wincrt;

var

liczba:integer;

begin

writeln ('Podaj liczbe od 1 do 3 ');

readln (liczba);

clrscr;

case liczba of

1: Writeln ('jeden');

2: Writeln ('dwa');

3: Writeln ('trzy');

else Writeln ('Numer nie poprawny')

end;

end.

---