enligt följande program :-