Найти ненулевые цифры

[kommunist]

Здраствуйте форумчане, у меня возникла поблема с задачей:
Найти элементы матрицы 3Х4, произведение ненулевых цифр которых больше 10, и их индексы. Подскажите как сделать проверку есть ли
в элементе нулевые цифры(элементы матрицы трехзначные числа)
Заранее спасибо!

С уважением kommunist!

[_Dmitry]

Можно перевести цифры в строки и анализировать посимвольно.

[Abbatik]

pascal:

str(i,s);
{перевод из числа в строку i:integer; s:string}
val(s,i,e);
{перевод из строки в число i,e:integer; s:string}

delphi:

i:=StrToInt(s);
{перевод из числа в строку i:integer; s:string}
s:=IntToStr(i);
{перевод из строки в число i:integer; s:string}