7.2.. Za učitane a i b izračunati z prema formuli:
![](072_zad/07211050.gif)
Opis programa: Prvo treba naći maksimum od a i b, pa maksimum od kvadrata a i b te na kraju porediti a i b i izračunati z.
Listing programa:
REM p07211050;
CLS
INPUT "Unesi dva broja"; a, b
max = a
IF b > a THEN
b = max
END IF
max2 = a ^ 2
IF b ^ 2 > a ^ 2 THEN
max2 = b ^ 2
END IF
IF a > b THEN
z = max
ELSE
z = max2
END IF
PRINT "a="; a, "b="; b, "max="; max, "max2="; max2, "z="; z
END
Ispis na ekranu:
![](../../pascal/pascal_prir/072/072_izvedi/07211050.gif)
Index
|