- This program plots the geometric distribution p(n) = q^(n-1)*p for n = 1,2,3,... where you specify the parameter p and q = 1-p.