18 lines
261 B
Text
18 lines
261 B
Text
import "../lib/math.ang"
|
|
|
|
# Inputs
|
|
c := 1.0*pow(10.0, -2.0)
|
|
|
|
println(c)
|
|
pH := -log(c, 10.0)
|
|
|
|
println(pH)
|
|
|
|
if pH == 7.0 {
|
|
println("pH-en er nøytral (=7)")
|
|
} else if pH < 7.0 {
|
|
println("pH-en er sur (<7)")
|
|
} else {
|
|
println("pH-en er basisk (>7)")
|
|
}
|
|
|