пока сделал числом, но что-то подсказывает, что это неоптимальное решение :)

Василий М. 21.07.2011 18:09

@number[]
$nomer(1934)
$tys(^math:floor(^eval($nomer/1000)))
$sto(^math:floor(^eval(($nomer-$tys*1000)/100)))
$des(^math:floor(^eval(($nomer-$tys*1000-$sto*100)/10)))
$yed(^math:floor(^eval($nomer-$tys*1000-$sto*100-$des*10)))
$tys, $sto, $des, $yed