Page 16 - 120900035890_gallo_cloud_tecno

Basic HTML Version

15
programmazione imperaTiva: l’approccio Top-down
unItà dI aPPrendIMento 1
ForMaLIzzazIone deLL’aLGorItMo
aLGorItMo
equazsecondogrado
VarIaBILI
a, B, c:
Intero
delta, X1, X2, X:
reaLe
MaIn
()
InIzIo
acquisiscicoefficienti()
se
(a
0)
aLLora
calcoladelta()
visualizzasoluzioni()
aLtrIMentI
risolviequazprimogrado()
FInese
FIne
ProCedura
acquisiscicoefficienti()
InIzIo
sCrIVI
(“inserisci il valore del coefficiente a”)
LeGGI
(a)
sCrIVI
(“inserisci il valore del coefficiente b”)
LeGGI
(B)
sCrIVI
(“inserisci il valore del coefficiente c”)
LeGGI
(c)
FIne
ProCedura
calcoladelta()
InIzIo
delta
B * B – 4 * a * c
FIne
ProCedura
visualizzasoluzioni()
InIzIo
se
(delta < 0)
aLLora
sCrIVI
(“l’equazione non ammette soluzioni reali”)
aLtrIMentI
X1
(–B –
radQuadrata
(delta)) / (2 * a)
X2
(–B +
radQuadrata
(delta)) / (2 * a)
sCrIVI
(“X1 = ”, X1, “X2 = ”, X2)
FInese
FIne
ProCedura
risolviequazprimogrado()
InIzIo
se
((B = 0)
and
(c = 0))
aLLora
sCrIVI
(“equazione indeterminata”)
aLtrIMentI
se
(B = 0)
aLLora
sCrIVI
(“equazione impossibile”)
aLtrIMentI
X
–c / B
FInese
FInese
FIne