importera math
importera random
definiera minfunktion(x)
låt A vara ett tal större än maximala värdet av s(x) på 0<x<1
låt N vara antal slumpade punkter
låt s vara 0
för i från 1 till N
låt x vara ett slumptal mellan 0 och 1
låt y vara ett slumptal mellan 0 och A
om minfunktion(x) > y
s = s + 1
låt integral vara A*s/N
skriv ut integral