Найти в интервале [100,N] все целые числа, не содержащие повторяющихся цифр

[hardasm]

Моя идея: найти количество цифр числа, найти количество различных цифр числа. Если эти количества совпадают, то данное число не содержит повторяющихся цифр. Этим правилом пройти все числа от N до 100. На С++ написал - работает, на Ассемблере - не могу. Помогите, пожайлуста перевести на Асм для TASM!

Код: (C++)

//Найти в интервале от 100 до n все целые числа, не содержащие повторяющихся цифр
#include<iostream>
#include<clocale>
using namespace std;
// кол-во цифр числа
int numberOfDigits(int m)
{
        int i=0;
        for(; m!=0; i++)
                        m/=10;
        return i;
}
// кол-во различных цифр числа
int numberOfDifferDigits(int m)
{
        const unsigned peak=20;//максимальное кол-во цифр N-числа, с к-рым компилер может работать
        bool L[peak];
        for(int i=0; i<peak; i++) L[i]=0;
        do
        {
                L[m%10]=1;
                m/=10;
        } while(m!=0);
        unsigned uniq=0;//счётчик различных цифр числа:
        for(int i=0; i<peak; i++)
                uniq+=L[i];
        return uniq;
}
 
int main()
{
        setlocale(LC_ALL,"russian");
        cout<<"Введи число больше ста: ";
        int n; cin>>n;
        cout<<"Количество цифр числа: "<<numberOfDigits(n)<<'\n';
        cout<<"Количество различных цифр числа: "<<numberOfDifferDigits(n)<<'\n';
        while(n!=100)
        {
                if(numberOfDigits(n)==numberOfDifferDigits(n)) //если кол-во цифр числа равно кол-ву различных цифр числа, то это число не содержит повторяющихся цифр
                        cout<<n<<'      ';
                n--;
        }
        return 0;
}

[Oldy]

У С-компиляторов есть инструкция компиляции через (в) ассемблер. Попробуйте использовать ее. (У Borland C++ "-S")

[Finch]

Так, заметки в сторону

Код: (C++)

        const unsigned peak=20;//максимальное кол-во цифр N-числа, с к-рым компилер может работать
        bool L[peak];
        for(int i=0; i<peak; i++) L[i]=0;

В десятичной системе, обшее количество комбинаций чисел всего десять. Так что L[10] и далее просто бесмысленно. Да и еше больше можно убыстрить и упростить алгоритм. Деление довольно сложная и тяжеллая операция. Процессор выполняет ее в десятки раз дольше чем даже умножение.

[Вад]

Кроме того, организовывать полный перебор с проверкой... нерационально как-то.
Количество итоговых комбинаций будет сильно ниже, чем полное количество цифр в интервале. И все эти дорогостоящие проверки...
Не проще ли сразу подсчитывать количество возможных перестановок? То есть, алгоритмически, будет немного посложнее, конечно, но оно того стоит, я думаю.

[hardasm]

В десятичной системе, обшее количество комбинаций чисел всего десять. Так что L[10] и далее просто бесмысленно. Да и еше больше можно убыстрить и упростить алгоритм. Деление довольно сложная и тяжеллая операция. Процессор выполняет ее в десятки раз дольше чем даже умножение.

Согласен, протупил

Добавлено через 48 секунд:

У С-компиляторов есть инструкция компиляции через (в) ассемблер. Попробуйте использовать ее. (У Borland C++ "-S")

А для Visual studio не подскажете?

[Вад]

У С-компиляторов есть инструкция компиляции через (в) ассемблер. Попробуйте использовать ее. (У Borland C++ "-S")

А для Visual studio не подскажете?

В зависимости от версии студии, возможны отличия, но в 2008й в настройках проекта есть "C/C++"->"Output files"->"Assembler Output", где нужно выбрать желаемое среди вариантов (ключ /FA с вариациями)

[hardasm]

В зависимости от версии студии, возможны отличия, но в 2008й в настройках проекта есть "C/C++"->"Output files"->"Assembler Output", где нужно выбрать желаемое среди вариантов (ключ /FA с вариациями)

Спасибо, буду знать. (правда для меня это не выход: асм-файл весит аш 69кб, содержит 2тыщи строк, ладно буду думать. Если у кого-то что-то похожее найдётся, будьте людьми... спасибо)

[Dimka]

hardasm, так он тебе, чтобы "подсмотреть как", а не для того, чтобы его взять и сдать. Халявы не будет.

[Вад]

hardasm, ты лучше ответь на вопрос:

Не проще ли сразу подсчитывать количество возможных перестановок?

Просто пост начинался с твоей идеи, которая выглядит в корне неверной - в смысле, неэффективной. Или комбинаторику не проходили?

[hardasm]

hardasm, ты лучше ответь на вопрос:

Не проще ли сразу подсчитывать количество возможных перестановок?

Просто пост начинался с твоей идеи, которая выглядит в корне неверной - в смысле, неэффективной. Или комбинаторику не проходили?

проходили, в школе) С Новым Годом!

[Finch]

В школе проходят комбинаторику?

[Dimka]

Finch, в некоторых школах - да.

[hardasm]

Ну вот, на плюсах упростил (идея та же):

Код: (C++)

//Найти в интервале от 100 до n все целые числа, не содержащие повторяющихся цифр
#include<iostream>
#include<clocale>
using namespace std;

int main()
{
        setlocale(LC_ALL,"russian");
        cout<<"Введи число больше ста: ";
        int n; cin>>n;
        bool L[10]; // каждый "бит" этого массива отвечает за присутствие цифры в текущем числе
        for(int i=100;i<=n;i++)
        {
                for(int j=0; j<10; j++)
                        L[j]=0;
                int tmp=i;
                while(tmp!=0) // есть ли в числе разные цифры?
                {
                        if(L[tmp%10]!=0)
                                break;
                        L[tmp%10]=1;
                        tmp/=10;
                        if(tmp==0)
                                cout<<i<<' ';
                }
        }
        cout<<endl;
        return 0;
}

Пытаюсь стряпать аналог на ассемблере:

Код: (ASM)

        .model small
        .stack
        .data
n       dw      ?
LM      dw      ? ; как-бы аналог массива bool L[10]
ten     dw      10
ms      db      "Vvedi n>100:$"
        .code
extrn writer:near
extrn read:near
        .startup
; Выводим просьбу ввести n
mov ah,9
lea dx,ms
int 21h
call read
mov n,ax; запоминаем n

mov cx,100
next: ; как-бы аналог цикла for(int i=100;i<=n;i++)
        lea bx,LM
        add bx,20
        nuler:  ; заполним массив нулями
                mov [bx],0
                dec bx
                dec bx
                jnz nuler
                mov [bx],0
        inc cx
        mov ax,cx; сохраним cх
        proverka_chisla: ; есть ли в текущем числе разные цифры?
                ;cwd
                div ten; остаток от деления на 10 попадёт в dx
                ;lea bx,LM
                add dx,dx
                add bx,dx
                mov si,[bx]
                sub bx,dx
                cmp si,0
                jne next; если si не=0, значит в текущем числе уже есть цифра равная dx
                mov [bx],1
                cmp ax,0
                jne proverka_chisla
        mov ax,cx
        call writer
        cmp ax,n
        jne next

mov ah,1
int 21h
        .exit
        end

Ошибка: Divide overflow Понимаю, что идея далеко не самая эффективная, но мне сейчас главное "шоб работало" - на творчество нет времени . Помогите подправить , пожалуйста.

[Finch]

Код: (ASM)

        lea bx,LM
        add bx,20
        nuler:  ; заполним массив нулями
                mov [bx],0
                dec bx
                dec bx
                jnz nuler
                mov [bx],0

Вот тут переполнение налицо. Причем n тоже будет обнулен. Кстати для таких случаев есть замечательные команды. Работа с массивом байт.

Код: (ASM)

rep movsw

[hardasm]

Код: (ASM)

        lea bx,LM
        add bx,20
        nuler:  ; заполним массив нулями
                mov [bx],0
                dec bx
                dec bx
                jnz nuler
                mov [bx],0

Вот тут переполнение налицо. Причем n тоже будет обнулен.

а как обнулится n, не пойму?

[Finch]

Посмотри команду movsw. Ну или если хочеш вручную, заведи в любом регистре счетчик и считай до 20.  Вернее от 20 до 0.