Instrukcja warunkowa.
W Turbo Pascalu istnieją dwie instrukcje warunkowe:
•
Instrukcja „jeśli”,
•
Instrukcja wyboru CASE.
Podejmowanie decyzji „jeśli”.
Instrukcja „jeśli”
IF wyrażenie THEN
Instrukcja_1
lub
IF wyrażenie THEN
Instrukcja_1
ELSE
Instrukcja_2
Przykład:
Należy napisać program, który ma wczytać dowolną liczbę
całkowitą i jeżeli będzie ona mniejsza od 10, to wyświetlić
komunikat: ‘Jestem mniejsza niż 10’, w przeciwnym
wypadku komunikat: ’Jestem większa lub równa 10’.
program Komunikat;
var
liczba:integer;
begin
write(‘Proszę napisac dowolna liczbe calkowita: ‘);
readln(liczba);
if liczba<10 then
writeln(‘Jestem mniejsza niż 10’);
else
writeln(‘Jestem wieksza lub rowna 10’);
readln;
end.