(2)
Die einzelnen Punkte im Diagramm erhält man mit Hilfe des VECTOR-Befehles unter Verwendung der oben angegebenen Definition p(n): p_punkte(n) := VECTOR([k,p(k)],k,1,n)