procedure minsttask(mask, taskseg, taskofs: word);