for x:=1 to unendlich do x*mc

Druckbare Version