 Работа с массивом, цикл на исключение элементов |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| NightPaladin |
  27.11.2004 16:39
Сообщение
#1
|
 Пионер  Группа: Пользователи Сообщений: 67 Пол: Мужской Репутация:  0   |
Ещё одна задача. В ней надо постоянно исключать каждый второй элемент т.к они расположены по кругу, то закончив один круг т.е. дойдя до еденицы, новый круг проходит уже для оставшихся элементов, и т.д. до тех пор пока не останется одно - вот его и надо вывести на экран
Собственно условие Числа от 1 до N расставляем по кругу и вычеркиваем каждое второе число, начиная с 1. Определить какое число останется последним. На входе натуральное число N (1<= N <= 1000 000), на выходе последнее число. Пример Результат 5 3 Сообщение отредактировано: NightPaladin - 27.11.2004 16:40 -------------------- На горе лежит дискета
У неё испорчен boot Через дырочку в конверте Её вирусы грызут |
   |
 
|
  |
Ответов
| Jahnerus |
29.11.2004 18:23
Сообщение
#2
|
 Уникальный Группа: Пользователи Сообщений: 64 Пол: Мужской Репутация: 2 |
Спасибо за понимание ... APAL
 -------------------- Век живи, век учи С © by Jahnerus
|
|
|
|
Сообщений в этой теме
NightPaladin Работа с массивом 27.11.2004 16:39
Jahnerus uses
crt;
const
n=5;
var
a:array[1..... 27.11.2004 19:28 volvo Jahnerus
Это тебе ни о чем не говорит? Ты прогон... 27.11.2004 19:31 Jahnerus volvo
Да и на 1000000 прогонял работает нормано... 27.11.2004 19:35 volvo Jahnerus
const
n=1000000;
var
a:array... 27.11.2004 19:54 volvo А вот это - работает для любых значений, которые п... 27.11.2004 20:09 NightPaladin Всем большой сэнкс volvo и Jahnerus
Если не трудно... 27.11.2004 20:23 GoodWind Скажи одному из модераторов (мне, Volvo, или Oleg_... 28.11.2004 8:25 Altair
Вообще-то я не модератор :)
:D :rolleyes: 28.11.2004 9:08 GoodWind
зато ты до-сих пор числишься в модераторах раздел... 28.11.2004 9:14 Altair Больше 10000 программа Jahnerus не потянет. Массив... 28.11.2004 9:14 NightPaladin Опять здравствуйте. Вообщето я имел ввиду повысить... 28.11.2004 10:01 Altair :D :D :D :D 28.11.2004 10:09 Jahnerus Oleg_Z
Оплошность моя в том что писал я её на Del... 28.11.2004 11:52 Altair
Ок :D
Но если это не пойжет на FPC, вообзе сниж... 28.11.2004 12:04 Jahnerus Ценю юмор ....
Ну FPC то покруче будет чем TPC та... 28.11.2004 12:12 Флогримм
снизить значит уменьшить, значит -, а Зю сказал, ... 29.11.2004 6:13 GoodWind
а вот и есть... был тут кто-то с рейтингом -1 :l... 29.11.2004 15:07 Jahnerus GoodWind
Я тоже хочу рейтинг -1 :( . Ты же всемо... 29.11.2004 17:46 APAL
Мазохист..... я не садист, но помочь могу... хотя... 29.11.2004 18:08 GoodWind APAL, млин я тоже чуть ему не понизил :lol: :lol... 29.11.2004 19:00 Jahnerus GoodWind
Конешно , а почему бы и нет ... :lol: с... 29.11.2004 19:23 Altair Апалу: плохой пример подаешь - ты же админ - образ... 29.11.2004 22:16
GoodWind Гы... зато весело было :lol:
А кто тебе разреша... 30.11.2004 18:31 |
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 23.06.2025 19:48 |