%EQ2GRST Script per la risoluzione di un'equazione % di secondo grado (solo soluzioni reali) % con i coefficienti a, b e c non nulli % FORMULE STABILI % Settare il formato di visualizzazione % Scrivere a video "Risoluzione di un'equazione di secondo grado" % Chiedere all'utente di inserire i coefficienti a, b, c dell'equazione % Controllare che siano tutti NON nulli % se è così calcolare le radici, %CALCOLO DELLE RADICI % calcolo del discriminante delta % se delta<0 nessuna soluzione reale (scriverlo a video) % se delta = 0 due soluzioni reali coincidenti(scriverle a video) % altrimenti x1 e x2 reali e distinte USANDO LE FORMULE STABILI (scriverle a video) % altrimenti dare un messaggio di errore