main.lua

-- Lua
-- запустить можно например тут http://www.lua.org/cgi-bin/demo

function spherev(r)
	return 4/3 * r^3 * math.pi
end


au_m = 1496 * 10^8
cm_m = 0.01

p_m = 5 / cm_m 

mp_kg = 1.672 * 10^-27

v_kmPERs = 494
v_cmPERs = v_kmPERs * 10^3 * 10^2

ans1 =((spherev(au_m) - spherev(au_m - cm_m)) * p_m) * mp_kg --0.0023556307714686

print( ans1 ) --0.0023556307714686 kg

print( ans1 * v_cmPERs ) --116368.16011055 cm/s * kg 
-- Какая-то странная размерность cm/s * kg, но по логике у меня это означает, 
-- что раз они с такой скоростью летят, то каждую секунду будут прилетать новые 5 протонов