На самом деле не знаю, как это делается в Паскале. Но во всех языках программирование это делается похоже. Вот общий принцип (пишу на C): int a, b, c; // здесь наши три числа a=1; b=2; c=3; if(a<b && a<c){ a=a/10; }else if(b<a && b<c){ b=b/10; }else if(c<a && c<b){ c=c/10; } Скорее всего, в Паскале надо убрать будет точку с запятой ( в конце каждой строки.