Вывести все четырехзначные числа в записи которых нет двух одинаковых цифр

@Beregond · Регистрация: 15.10.2012

Студворк — интернет-сервис помощи студентам

Вывести все четырехзначные числа в записи которых нет двух одинаковых цифр.
Например 1234;1345;1789;6789.
Выполнить без функций и продцедур.

Мой код не работает(

#include "stdafx.h"
#include<iostream>
#include<math.h>
using namespace std;

int _tmain(int argc, _TCHAR* argv[])
{ int f=0,i=0,x,z,f2,y,k,j;
int mas[4];
for(x=1000;x<=9999;x++)
{f2=0;i=0;f=0;
z=x;

while(f<1)
{mas[i]=z%10;
z=z/10;
i++;
if(z==0)f=1;
}

for(y=3;y>=1;y--){
k=0;j=0;
while(k<3)
{if(mas[y]==mas[j]){k=3;f2=1;y=0;} else{j++;k++;};
}
}
if(f2<1)cout<<"x="<<x<<endl;
}

cin.get();
cin.get();

return 0;
}

valeriikozlov · 24.10.2012, 21:43

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
#include "stdafx.h"
 #include<iostream>
 #include<math.h>
 using namespace std;
 
 int main()
 { int f=0,i=0,x,z,k=0;
 int mas[10];
 for(x=1000;x<=9999;x++)
 {
     for(i=0; i<10; i++)
         mas[i]=0;
     z=x;
     while(z)
     {
         mas[z%10]++;
         z/=10;
     }
     for(i=0; i<10; i++)
         if(mas[i]>1)
             break;
     if(i==10)
     {
         cout<<x<<" ";
         k++;
         if(k%15==0)
             cout<<endl;
         if(k%500==0)
             cin.get();
 
         
     }
 }
 
 
 cin.get();
 
 return 0;
 }

@Beregond · 24.10.2012, 22:22 **[ТС]**

Спасибо огромное)
Очень выручили))

Новые блоги и статьи Все статьи Все блоги /
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly 8Observer8 24.01.2026 Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а привычная функция main(). . .	моя боль iceja 24.01.2026 Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .	Модель сукцессии микоризы anaschu 24.01.2026 Решили писать научную статью с неким РОманом	http://iceja.net/ математические сервисы iceja 20.01.2026 Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов iceja 18.01.2026 Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .	Расчёт переходных процессов в цепи постоянного тока igorrr37 16.01.2026 / * Дана цепь(не выше 3-го порядка) постоянного тока с элементами R, L, C, k(ключ), U, E, J. Программа находит переходные токи и напряжения на элементах схемы классическим методом(1 и 2 з-ны. . .	Восстановить юзерскрипты Greasemonkey из бэкапа браузера damix 15.01.2026 Если восстановить из бэкапа профиль Firefox после переустановки винды, то список юзерскриптов в Greasemonkey будет пустым. Но восстановить их можно так. Для этого понадобится консольная утилита. . .	Сукцессия микоризы: основная теория в виде двух уравнений. anaschu 11.01.2026 https:/ / rutube. ru/ video/ 7a537f578d808e67a3c6fd818a44a5c4/

@Beregond 0 / 0 / 0 Регистрация: 15.10.2012 Сообщений: 13

	Вывести все четырехзначные числа в записи которых нет двух одинаковых цифр 24.10.2012, 20:16. Показов 11161. Ответов 2 Метки нет (Все метки) Вывести все четырехзначные числа в записи которых нет двух одинаковых цифр. Например 1234;1345;1789;6789. Выполнить без функций и продцедур. Мой код не работает( #include "stdafx.h" #include<iostream> #include<math.h> using namespace std; int _tmain(int argc, _TCHAR* argv[]) { int f=0,i=0,x,z,f2,y,k,j; int mas[4]; for(x=1000;x<=9999;x++) {f2=0;i=0;f=0; z=x; while(f<1) {mas[i]=z%10; z=z/10; i++; if(z==0)f=1; } for(y=3;y>=1;y--){ k=0;j=0; while(k<3) {if(mas[y]==mas[j]){k=3;f2=1;y=0;} else{j++;k++;}; } } if(f2<1)cout<<"x="<<x<<endl; } cin.get(); cin.get(); return 0; } 0

@Beregond 0 / 0 / 0 Регистрация: 15.10.2012 Сообщений: 13
	24.10.2012, 22:22 [ТС]
	Спасибо огромное) Очень выручили)) 0

Вывести все четырехзначные числа в записи которых нет двух одинаковых цифр

Решение