7.2.. Napisati program za izračunavanje vrijednosti z prema izrazu:
Opis rješenja: Zadatak ima tri različita izraza za izračunavanje varijable y. Izložena je jedna od mogućih varijanti rješenja. Koristiće se dvije IF THEN ELSE naredbe i to tako da je druga IF naredba u ELSE dijelu prve naredbe. Prva IF naredba u dijelu THEN rješava jedna mogućnost, a sa druga IF naredba preostale dvije mogućnosti. Jasno je da se zadatak može riješiti i sa tri IF THEN naredbe, ili sa dvije IF THEN naredbe koje koriste GOTO naredbu za skok na kraj.
Opis programa: Logičkim izrazom a>0 u prvoj IF naredbi se provjerava da li je broj pozitivan. Ako je ovaj logički izraz istinit (a veće od 0) varijabla y prima vrijednost prema izrazu y:=b/a. Inače se sa drugom IF naredbom provjerava da li je vrijednost varijable a u intervalu -3<a<=0. Provjera ovog intervala se izvodi sa logičkim izrazom koji mora koristiti naredbu AND, budući da se varijabla može porediti samo sa jednim logičkim operatorom. Ako je ovaj logički izraz (-3<a AND a<=0) istinit varijabli y se pridružuje vrijednost prema izrazu: y:=a+3. Inače, ako je izraz lažan pridruživanje se izvodi sa izrazom y:=a+b.
Listing programa:
REM 07211018
CLS
PRINT "Brojevi"
INPUT a, b
IF a > 0 THEN
z = b - a
ELSEIF (-3 < a) AND (a <= 0) THEN
z = a / 3
ELSE
z = 2 * b
ENDIF
PRINT " a ="; a, " b = "; b, "z = "; z
END
Izvođenje programa:
![](../../pascal/pascal_prir/072/072_izvedi/07211018.gif)
Index
|