7.2.. Učitati broj ispisati znak broja prema izrazu:
Opis rješenja: Navedeni izraz ima slijedeće značenje: ako je x>=0, tada je z=1, inače je z=0. Ovo je razgranata struktura tipa IF THEN ELSE.
| Tekstualni algoritam | Listing u Programskom jeziku BASIC-u |
| IF Logicki uslov THEN Istinit /TRUE/: Obrada1 ELSE Lažan /FALSE/: Obrada2 |
IF X >= 0 THEN : REM Logicki uslov - Ako je X >= 0 Z = 1 : REM Istinit /TRUE/: Z = 1 ELSE Z = 0 : REM Lazan /FALSE/: Z = 0 END IF |
Elementi ove strukture su: LOGIČKI IZRAZ (x>=0), Obrada1 (z=1) i Obrada2(z=0). Logički izraz je istinit ako je x = 0 i tada se izvodi Obrada1 (z=1), inače kad je logički izraz lažan izvodi se Obrada2 odnosno z prima vrijednost nule.
Opis programa: Na početku programa su navedeni tipovi varijabli. Program počinje sa tekstom da treba upisati broj. Po upisu broja izvodi se provjera vrijednosti broja (da li je negativan). Ako je upisani broj veći ili jednak nuli varijabla z postaje 1 inače z postaje 0. Na kraju je ispis vrijednosti varijabli x i z.
Listing programa:
CLS INPUT "UNESI BROJ X:"; X REM Logicki uslov - Ako je X >= 0 IF X >= 0 THEN Z = 1: REM Istinit /TRUE/: Z = 1 ELSE Z = 0: REM Lazan /FALSE/: Z = 0 END IF PRINT "X = "; X ; " Z = "; Z END II Varijanta CLS INPUT "UNESI BROJ X:"; X IF X >= 0 THEN Z = 1 ELSE Z = 0: REM if then else PRINT "X = "; X ; " Z = "; Z END
Ispis na ekranu:
 |
 |
 |
 |  |
