 Помогите с задачей, найти 3-хзначные числа кратные 7 и...... |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| StudentTNGU |
 3.12.2006 20:17
Сообщение
#1
|
|
Гость  |
Помогите решить задачку, плиз. Сижу парюсь с ней уже весь день... Перечитал лекции, книжки по паскалю - понять не могу как решить. Вот задачка:
Найти все трехзначные числа кратные 7 и сумма цифр которых тоже кратна 7. Плж помогите... |
 
|
|
  |
Ответов
| klem4 |
4.12.2006 13:06
Сообщение
#2
|
 Perl. Just code it!  Группа: Модераторы Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация:  44  |
Цитата Вот самый правильный вариант: И с чего ты это взял ? среднее время (1000 прогонов) Моя: 2063 ms Твоя: 2283 ms Так что ... -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
   |
|
Сообщений в этой теме
StudentTNGU Помогите с задачей 3.12.2006 20:17
klem4 Ну вот самый простой вариант:
uses crt;
var
i, ... 3.12.2006 21:06
Гость
Да и циклы конечно поменьше можно сделать ...
f... 3.12.2006 21:25 klem4
Потомучто в 4-х значном числе 4 цифры :)
Для ка... 3.12.2006 21:44 volvo klem4, то есть, число 518, например, по-твоему, на... 3.12.2006 21:54 klem4 :lol:
Я еще и вторую часть задания не так сдел... 3.12.2006 22:05 }0pa Вот самый правильный вариант:
uses crt;
var i... 4.12.2006 8:31 StudentTNGU Всем большое спасибо за помощь. Теперь все работае... 4.12.2006 9:14 }0pa Ну,может быть чуть быстрей, но согласись, что мой ... 4.12.2006 13:58 klem4
Не соглашусь ... Но и спорить с тобой дальше тож... 4.12.2006 14:18 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 19.07.2025 22:54 |