简单的送分题。
BUG 请注意
import math.
main =>
A = read_real(),
B = read_real(),
C = read_real(),
D = B*B-4*A*C,
E := sqrt(D),
F :=(-B+E)/(2.0*A),
G :=(-B-E)/(2.0*A),
if (F=G) then
printf("%f%n", F )
else
printf("%f %f%n", min(G,F), max(G,F) )
end.