7.1.. Provjeriti da li je suma dva učitana broja nije dvocifrena, tada ispisati NIJE DVOCIFREN.
Opis programa: Logički izraz je (s < 10) OR (s > 99).
Listing programa:
PROGRAM P07111038;
USES
WinCrt;
VAR
a, b, s: INTEGER;
BEGIN
Writeln('Dvocifrena suma?');
Write('1. Broj ');
Readln(a);
Write('2. Broj ');
Readln(b);
s := a + b;
IF (s < 10) OR (s > 99) THEN
Writeln('nije dvocifren');
END.
Ispis na ekranu:
![](../../pascal_prir/071/071_izvedi/07111038.gif)
Index
|