IPB
ЛогинПароль:

> Прочтите прежде чем задавать вопрос!

1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!

> Работа с массивом, цикл на исключение элементов
сообщение
Сообщение #1


Пионер
**

Группа: Пользователи
Сообщений: 67
Пол: Мужской

Репутация: -  0  +


Ещё одна задача. В ней надо постоянно исключать каждый второй элемент т.к они расположены по кругу, то закончив один круг т.е. дойдя до еденицы, новый круг проходит уже для оставшихся элементов, и т.д. до тех пор пока не останется одно - вот его и надо вывести на экран
Собственно условие
Числа от 1 до N расставляем по кругу и вычеркиваем каждое второе число, начиная
с 1. Определить какое число останется последним.
На входе натуральное число N (1<= N <= 1000 000), на выходе последнее число.
Пример Результат

5 3

Сообщение отредактировано: NightPaladin -


--------------------
На горе лежит дискета
У неё испорчен boot
Через дырочку в конверте
Её вирусы грызут
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

Сообщений в этой теме
NightPaladin   Работа с массивом   27.11.2004 20:39
Jahnerus   uses  crt; const  n=5; var  a:array[1..…   27.11.2004 23:28
volvo   Jahnerus Это тебе ни о чем не говорит? Ты прогон…   27.11.2004 23:31
Jahnerus   volvo Да и на 1000000 прогонял работает нормано…   27.11.2004 23:35
volvo   Jahnerus const n=1000000; var a:array…   27.11.2004 23:54
volvo   А вот это - работает для любых значений, которые п…   28.11.2004 0:09
NightPaladin   Всем большой сэнкс volvo и Jahnerus Если не трудно…   28.11.2004 0:23
GoodWind   Скажи одному из модераторов (мне, Volvo, или Oleg_…   28.11.2004 12:25
Altair   Вообще-то я не модератор :) :D :rolleyes:   28.11.2004 13:08
GoodWind   зато ты до-сих пор числишься в модераторах раздел…   28.11.2004 13:14
Altair   Больше 10000 программа Jahnerus не потянет. Массив…   28.11.2004 13:14
NightPaladin   Опять здравствуйте. Вообщето я имел ввиду повысить…   28.11.2004 14:01
Altair   :D :D :D :D   28.11.2004 14:09
Jahnerus   Oleg_Z Оплошность моя в том что писал я её на Del…   28.11.2004 15:52
Altair   Ок :D Но если это не пойжет на FPC, вообзе сниж…   28.11.2004 16:04
Jahnerus   Ценю юмор .... Ну FPC то покруче будет чем TPC та…   28.11.2004 16:12
Флогримм   снизить значит уменьшить, значит -, а Зю сказал, …   29.11.2004 10:13
GoodWind   а вот и есть... был тут кто-то с рейтингом -1 :l…   29.11.2004 19:07
Jahnerus   GoodWind Я тоже хочу рейтинг -1 :( . Ты же всемо…   29.11.2004 21:46
APAL   Мазохист..... я не садист, но помочь могу... хотя…   29.11.2004 22:08
Jahnerus   Спасибо за понимание ... APAL :lol:   29.11.2004 22:23
GoodWind   APAL, млин я тоже чуть ему не понизил :lol: :lol…   29.11.2004 23:00
Jahnerus   GoodWind Конешно , а почему бы и нет ... :lol: с…   29.11.2004 23:23
Altair   Апалу: плохой пример подаешь - ты же админ - образ…   30.11.2004 2:16
GoodWind   Гы... зато весело было :lol: А кто тебе разреша…   30.11.2004 22:31


Closed Topic Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 20.05.2024 6:30
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name