На главную Наши проекты:
Журнал   ·   Discuz!ML   ·   Wiki   ·   DRKB   ·   Помощь проекту
ПРАВИЛА FAQ Помощь Участники Календарь Избранное RSS
msm.ru
! Правила раздела
1. Не создавайте несколько одинаковых тем, ибо модератор может расценить их, как спам и удалить все.
2. Для решения задач по GPSS есть отдельная тема. Все задачи по GPSS опубликовывать в этой теме! Перед опубликовыванием вашей задачи просмотрите всю тему, возможно вы сразу найдете решение.
3. Давайте вашим темам ОСМЫСЛЕННЫЕ названия, а также указывайте язык программирования. Пример: [Pascal]:Работа с файлами и записями.
4. Использования тега CODE обязательно при публикации текста программы.

Темы, оформленные с явным игнорированием правил и отсутствием смысла, будут закрыты/удалены!
Вам помогли? Напишите об этом здесь (в портфолио фрилансера)

Фрилансерам:
5. Демпинг цен запрещен (даже если Вы готовы работать бесплатно). Цены обсуждаются в приватном общении. Если вы готовы рещить задачу бесплатно, просто решите ее быстрее, чем возникнет предложение сделать это за деньги.
6. Пользователям, входящим в группу Newbie, запрещается предлагать свои услуги (завуалированно в т.ч.)
7. В посте с предложением выполнить работу, обязательно указывать ссылку на свое портфолио в Отзывы, Благодарности, Портфолио Это правило работает и в том случае, если вы выполняете работу бесплатно.
8. Реклама (даже завуалированная) своих фриланских сайтов запрещена

Нарушение данных пунктов влечет до RO или БАНА (при неоднократом)
Модераторы: ttiger, mikefreelance, Rust
  
    > [Delphi] Вывести числа из 2х массивов по увеличению
      Даны 2 массива чисел:

      ExpandedWrap disabled
        var
        Arr1 : array [1..x] of extended;
        Arr2 : array [1..y] of extended;


      Известно, что числа в каждом массиве упорядочены по увеличению.

      Задача
      За один цикл пройтись по числам в массивах и вывести все элементы по увеличению.

      Пример
      [1, 2, 9] & [1, 5, 6, 9] => 1,1,2,5,6,9,9.

      Постановщик задачи уверяет что она решаема.
      Меня смутило требование 1 цикла, ведь, вобще говооря, x<>y.

      Можно, впринципе, пройтись и одним циклом
      [CODE=pas]
      for i:=1 to max(x,y) do begin
      //
      end;
      [CODE]

      Но из-за разных X/Y можно наткнуться на несуществующие элементы массивов. Вставлять Try..Except не представляеться разумным.
        Готов выполнить за денежное вознаграждение.

        Моё объявление и отзывы
          Готов взяться за проект
          номер ICQ: 565460353 или 480964456
          mikefreelance@rambler.ru
          отзывы тут
          Благодарность для Mikefreelance
            Проект забрал.
              Проект выполнен.
              0 пользователей читают эту тему (0 гостей и 0 скрытых пользователей)
              0 пользователей:


              Рейтинг@Mail.ru
              [ Script execution time: 0,0229 ]   [ 15 queries used ]   [ Generated: 21.05.25, 12:11 GMT ]