enligt följande Program : r.