7.1. Provjeriti da li je suma dva učitana broja trocifrena. Ako jeste ispisati TROCIFREN.
Opis programa: Naredbom IF se izvodi provjera da li je suma dva učitana broja trocifrena. Logički izraz je u IF naredbi (s > 99) AND (s < 1000). Koristi i se i BOOLOV operator i (AND), oba relaciona izraza s > 99 i s < 1000 moraju biti ispunjena da bi logički izraz bio tačan. Ako jex logički izraz istitnit suma je troocifrena i ispisuje se tekst Trnocifren.
Listing programa:
PROGRAM P07111026;
VAR
a, b, s: INTEGER;
begin
Writeln('Trocifrena suma');
Write('1. Broj ');
Readln(a);
Write('2. Broj ');
Readln(b);
s := a + b; { suma brojave sa ulaza }
IF (s > 99) AND (s < 1000) THEN
Writeln('Trocifren');
READLN;
END.
Ispis na ekranu:
Index
|