# Un esempio di "calcoli" per affrontare un problema di "fisica"
# Un problema di fisica: uno SCIATORE di 80 kg (inclusi gli sci) scende
# da un pendio inclinato di 20°; in un certo istante ha velocità di 50 km/h;
# il coefficiente di attrito è 0.40. Quanto SPAZIO percorre prima di
# arrestarsi?  Supponiamo che l'accelerazione di gravità sia 9.80 m/s^2 e
# che le misure siano arrontondate
m <- 80; v0 <- 50*1000/3600; A <- 20*pi/180; k <- 0.4; g <- 9.8
# F1/F2 componenti del peso parallela/perpendicolare al moto
F1 <- m*g*sin(A); F2 <- m*g*cos(A)
Fatt <- F2*k; F <- F1-Fatt             # Forza di attrito. Risultante
a <- F/m; t <- -v0/a; s <- v0*t+a*t^2/2; signif(s,2)
# Ho arrotondato lo spazio a 2 cifre significative, ottenendo 290 m
# Per controllare, vediamo anche i valori di F1, F2, Fatt e F in kg:
c(F1, F2, Fatt, -F)/g