5 Pravdivostní výrazy

5.1 Typ Boolean

pro uchování hodnot pravda / nepravda

jen dvě možnosti:

True
False

A=B	A je rovno B
A <> B	A není rovno B
A <= B	A je menší nebo rovno B
A > B	A je větší než B atd....

Ač se v Čechách zdá, že to příliš neplatí, tak v Pascalu stále ještě je False < True.

btw: Pohlaví se s oblibou označuje jako typ boolean, jak také jinak, vypečené je, že obecně platí: muž = true, žena = false!

Více určitě vysvětlí příklad, který zjišťuje, zda je dané číslo dělitelné třemi či pěti.

5.1.1 program bodelit.pas:

program Delitelnost;

var Cislo : Integer;

Tremi, Peti : Boolean;

begin

Tremi := True; Peti := True;

Write ( 'Zjištění dělitelnosti. ' );

Write ( 'Zadejte čísla, záporné ukončí vstup: ' );

Read ( Cislo );

while Cislo > 0 do

begin

if Cislo mod 3 <> 0 then Tremi := False;

if Peti then

Peti := Cislo mod 5 = 0;

Read ( Cislo );

end;

Write ( 'Třemi: ', Tremi, ' Pěti: ', Peti );

end.

5.1.2 příklady:

JeMensi := I < J
je obdoba delšího:
if I < J then JeMensi := True
else JeMensi := False

if JeMensi then ....
je určitě elegentnější než
if JeMensi = True then ...

5.2 Pravdivostní tabulky

P	Q	not P	P and Q	P or Q
False	False	True	False	False
False	True	True	False	True
True	False	False	False	True
True	True	False	True	True

5.2.2 příklad:

(funkce Round sice zaokrouhluje reálnou hodnotu, ale překročíme-li maximální povolené meze, program se zbortí, následující příklad tuto chybu ošetřuje, MaxInt je hodnota povolené meze)

if (X >= - MaxInt) and (X <= MaxInt ) then

I := Round (x)

else

if X > MaxInt then I := MaxInt

else I := - MaxInt

5.2.3 Cvičení:

Sestav program, který zjistí, zda je zadané číslo dělitelné pěti, ale není sudé (= není dělitelné dvěma). .... a řešení
Sestav program, který zjistí zda je zadané číslo větší než 100, ale menší než 200.
Sestav program, který zjistí zda je zadané číslo menší než 100 nebo větší než 200.

<-předchozí

další->

aktualizace: 17.09.2002 17:25:36