using System;
using System.Console;
using Nemerle;
using Nemerle.Macros;
using Nemerle.Imperative;
using Nemerle.Utility;

def count=int.Parse(ReadLine());

foreach(max in [1 .. count])
{
	def items= $[1..max];
	def itemsReversedIfNeed=	if(max % 2 == 0)
						items.Rev()
					else
						items;
	def itemsOfString=itemsReversedIfNeed.Map(_.ToString());
	def line=String.Join("-", itemsOfString);
	WriteLine(line)
}