Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.94/34: Рейтинг темы: голосов - 34, средняя оценка - 4.94
0 / 0 / 0
Регистрация: 17.10.2013
Сообщений: 11
1

Напечатать все четырехзначные натуральные числа, в десятичной записи которых нет двух одинаковых цифр

17.10.2013, 22:59. Просмотров 6657. Ответов 1
Метки нет (Все метки)


Напечатать все четырехзначные натуральные числа, в десятичной записи которых нет двух одинаковых цифр.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.10.2013, 22:59
Ответы с готовыми решениями:

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

Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых цифр
Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых...

Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых цифр
3)Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет...

Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых цифр
Напечатать в возрастающем порядке все трехзначные числа, в десятичной записи которых нет одинаковых...

1
3020 / 1908 / 1647
Регистрация: 30.04.2011
Сообщений: 3,054
17.10.2013, 23:03 2
Лучший ответ Сообщение было отмечено risky fellow как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  a, b, c, d: integer;
 
begin
  for a := 1 to 9 do
    for b := 0 to 9 do
      for c := 0 to 9 do
        for d := 0 to 9 do
          if (a <> b) and (a <> c) and (a <> d) and
             (b <> c) and (b <> d) and
             (c <> d) then
            Write(a, b, c, d, #32);
  Readln
end.
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.10.2013, 23:03

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Вычисления суммы всех четырехзначных чисел, в десятичной записи которых нет двух одинаковых нечетных цифр
составьте программу вычисления суммы всех четырехзначных чисел,в десятичной записи которых нет двух...

Построить возрастающую последовательность трехзначных чисел, в десятичной записи которых нет одинаковых цифр
Заранее спасибо. Написать программу, не используя операции деления, построить возрастающую...

Получить все четырехзначные натуральные числа, в записи которых нет двух одинаковых цифр
2. Получить все четырехзначные натуральные числа, в записи которых нет двух одинаковых цифр

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


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.