Consideriamo la disequazione x·sin(x) ≤ 0.
Le sue soluzioni, nell'intervallo [−π, π],
sono:
A) 0 B) 1 C) 3 D) infinite
Il grafico di x → x·sin(x) è compreso tra le rette
Il grafico è stato fatto con questo script.
Con WolframAlpha:# Con R: source("http://macosa.dima.unige.it/r.R") f <- function(x) x*sin(x) BF=3; HF=2.5 Piano(-4,4, -3,3) grafi(f, -4,4, "black") g <- function(x) x; h <- function(x) -x coltrat="red"; grafi(g, -4,4, 0); grafi(h, -4,4, 0) Z = function(x) 0 for(i in 1:5) diseq(Z,f, -4,4, "blue") soluz(f,0, -4,-1) # [1] -3.141593 soluz(f,0, 4,1) # [1] 3.141593 PUNTO(pi,0, "red"); PUNTO(-pi,0, "red")