0 / 0 / 0
Регистрация: 11.11.2010
Сообщений: 8
1

Даны четырехзначные натуральные числа N и K (N, K <=1000). Из чисел от N до K выбрать те, запись которых содержит ровно три одинаковых цифры.

11.11.2010, 19:50. Показов 7054. Ответов 2
Метки нет (Все метки)

Даны четырехзначные натуральные числа N и K (N, K <=1000). Из чисел от N до K выбрать те, запись которых содержит ровно три одинаковых цифры. (Например: 6766, 5444, 0006).
Подсказка: использовать при написании программы функции MOD, INT и оператор безусловного перехода GOTO.
__________________
Помощь в написании контрольных, курсовых и дипломных работ, диссертаций здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
11.11.2010, 19:50
Ответы с готовыми решениями:

Выбрать из четырехзначных чисел те, запись которых содержит 3 одинаковых цифры
Задача: Даны целые четырехзначные числа n. Выбрать из них те запись которых содержит 3 одинаковых...

Вывести на экран все четырехзначные числа, которые содержат ровно три одинаковых цифры
Возникла такая проблема, только начали с формами работать я вообще не понимаю их сути, задача...

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

Вывести на экран все четырехзначные числа, в которых ровно три одинаковые цифры
Даны четырехзначные натуральные числа N и K. Из чисел от N до K выбрать те, запись которых содержит...

2
Платежеспособный зверь
8793 / 4220 / 1617
Регистрация: 28.10.2009
Сообщений: 11,355
11.11.2010, 20:06 2
Лучший ответ Сообщение было отмечено Jaspio как решение

Решение

Цитата Сообщение от Jaspio Посмотреть сообщение
Даны четырехзначные натуральные числа N и K (N, K <=1000). Из чисел от N до K выбрать те, запись которых содержит ровно три одинаковых цифры. (Например: 6766, 5444, 0006).
Подсказка: использовать при написании программы функции MOD, INT и оператор безусловного перехода GOTO.
PureBasic
1
2
3
4
5
6
7
8
9
INPUT "vvedite nachalo diapazona ", n
INPUT "vvedite konec diapazona ", k
FOR i = n TO k
a = i \ 1000
b = i \ 10 MOD 10
c = i \ 100 MOD 10
d = i MOD 10
IF a = b AND a = c AND a <> d OR a = b AND a = d AND a <> c OR a = c AND a = d AND a <> b OR b = c AND b = d AND b <> a THEN PRINT i;
NEXT
0
0 / 0 / 0
Регистрация: 11.11.2010
Сообщений: 8
11.11.2010, 20:19  [ТС] 3
Большое спасибо
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
11.11.2010, 20:19
Помогаю со студенческими работами здесь

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

Верно ли, что это число содержит ровно три одинаковых цифры
Помогите сделать .Дано натуральное число n (n&lt;=9999). Верно ли, что это число содержит ровно...

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

Найти все четырехзначные числа, в которых ровно две одинаковые цифры.
uses crt; var a,b,c,d:integer; begin clrscr; for a:= 1 to 9 do for b:= 0 to 9 do for...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru