Question

для трёхзначных чисел до N (N вводится с клавиатуры) вывести на экран только те ,у которых все цифры в представлении различны.

Answer 1

var  i,n,a,b,c    :integer;

begin

read(n);

i:=99;

for i:=100 to n do

begin

a:=i mod 10;

b:=i div 10 mod 10;

c:=i div 100;

if (a<>b) and (a<>c) and (b<>c) then write(i,' ');

end;

end.

 

 

 

 

проверь(для паскаля)

Answer 2

Вот пример программы на Python, которая выполняет указанную задачу:

pythonCopy code
def has_unique_digits(num):
    digits = set(str(num))
    return len(digits) == len(str(num))

N = int(input("Введите число N: "))

print(f"Трёхзначные числа до {N} с уникальными цифрами:")
for num in range(100, N+1):
    if has_unique_digits(num):
        print(num)

Эта программа определяет функцию has_unique_digits, которая принимает число и проверяет, имеются ли в нем все уникальные цифры. Затем она запрашивает у пользователя число N. Далее она проходит по всем трехзначным числам, начиная с 100 и до N, и выводит только те числа, у которых все цифры различны.

Например, если пользователь вводит N = 300, программа выведет следующий результат:

pythonCopy code
Трёхзначные числа до 300 с уникальными цифрами:
123
124
125
126
127
128
129
134
135
...

Обратите внимание, что программа будет работать только для чисел N, больших или равных 100.