start_section :
	var : integer;
	j   : integer :=0;               
end section;


priority_section :
	while j < 5 loop
		put(j);
		j:=j+1;
	end loop;
	j:=0; 
end section;
   
   
election_section :
        return min_to_index(tasks.priority);
end section;