a:=0;File standardInput foreach(v,write(if(v>a,"+","-")repeated((v-a)abs),".");a=v)