|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.02.2018, 01:49 | #1 |
Регистрация: 01.12.2015
Сообщений: 3
|
Числа
Помогите пожалуйста, я начинающий. есть такая задача.
Дано четырехзначное число.Определить 1)входит ли туда 5 и 6 2) и вывести наибольшее число которое туда входит Например 2946 Числа 5 и 6 не входят сюда одновременно наибольшая цифра числа 294 : 9 Код:
Последний раз редактировалось BDA; 21.02.2018 в 03:22. |
21.02.2018, 03:21 | #2 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,342
|
Я так понимаю, что проблема с 1 подзаданием. Например:
Код:
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
21.02.2018, 11:24 | #3 |
Форумчанин
Регистрация: 08.11.2017
Сообщений: 347
|
Код:
Тупо вводите число как число (целое) и в цикле проверяете последний (младший) разряд, потом делите на 10. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
дан двумерный массив пользователь вводит натуральные числа,массив размером N на M .Все числа из которых можно извлечь корень извлекаются все числа меньше нуля заменяются их модулем | qqq`` | Паскаль, Turbo Pascal, PascalABC.NET | 9 | 02.10.2017 17:11 |
Создать программу,имеющая процедуру,кторая в производном текстовом файле,которая имеет слова и числа,изменяющая все числа числа,ме | Fingergod | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 13.12.2012 20:08 |
Даны целые числа р и q. Получить все делители числа q, взаимно простые c г. | Владан | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 03.12.2012 23:39 |
Задачи в ТурбоПаскаль: найти числа Армстронга и просуммировать числа в последовательности номера которых простые числа | Lena1808 | Помощь студентам | 1 | 17.05.2012 08:00 |
Задані цілі числа від 1 до 100.Надрукувати в порядку зростання усі числа що можна подати у вигляді 7*i*j+j+3, де i,j - цілі числа. | Саша513 | Паскаль, Turbo Pascal, PascalABC.NET | 0 | 16.05.2012 18:45 |