<?xml version='1.0' encoding="utf-8"?>
      <rss version='2.0'>
      <channel>
      <title>Форум на Исходниках.RU</title>
      <link>https://forum.sources.ru</link>
      <description>Форум на Исходниках.RU</description>
      <generator>Форум на Исходниках.RU</generator>
  	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2995423</guid>
        <pubDate>Tue, 27 Sep 2011 08:40:59 +0000</pubDate>
        <title>[Delphi] Вывести числа из 2х массивов по увеличению</title>
        <link>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2995423</link>
        <description><![CDATA[_vek21: Проект выполнен.]]></description>
        <author>_vek21</author>
        <category>ПОМОЩЬ СТУДЕНТАМ</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994679</guid>
        <pubDate>Mon, 26 Sep 2011 08:43:52 +0000</pubDate>
        <title>[Delphi] Вывести числа из 2х массивов по увеличению</title>
        <link>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994679</link>
        <description><![CDATA[_vek21: Проект забрал.]]></description>
        <author>_vek21</author>
        <category>ПОМОЩЬ СТУДЕНТАМ</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994626</guid>
        <pubDate>Mon, 26 Sep 2011 07:53:40 +0000</pubDate>
        <title>[Delphi] Вывести числа из 2х массивов по увеличению</title>
        <link>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994626</link>
        <description><![CDATA[mikefreelance: Готов взяться за проект<br>
номер ICQ: 565460353 или 480964456 <br>
mikefreelance@rambler.ru<br>
отзывы тут <br>
<a class='tag-url' href='http://forum.sources.ru/index.php?showtopic=256557' target='_blank'>Благодарность для  Mikefreelance</a>]]></description>
        <author>mikefreelance</author>
        <category>ПОМОЩЬ СТУДЕНТАМ</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994459</guid>
        <pubDate>Mon, 26 Sep 2011 03:21:09 +0000</pubDate>
        <title>[Delphi] Вывести числа из 2х массивов по увеличению</title>
        <link>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994459</link>
        <description><![CDATA[_vek21: Готов выполнить за денежное вознаграждение.<br>
<br>
<a class='tag-url' href='http://forum.sources.ru/index.php?showtopic=313018&view=showall' target='_blank'>Моё объявление и отзывы</a>]]></description>
        <author>_vek21</author>
        <category>ПОМОЩЬ СТУДЕНТАМ</category>
      </item>
	
      <item>
        <guid isPermaLink='true'>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994384</guid>
        <pubDate>Sun, 25 Sep 2011 18:41:34 +0000</pubDate>
        <title>[Delphi] Вывести числа из 2х массивов по увеличению</title>
        <link>https://forum.sources.ru/index.php?showtopic=341186&amp;view=findpost&amp;p=2994384</link>
        <description><![CDATA[Delphist: Даны 2 массива чисел:<br>
<br>
<div class='tag-code'><span class='pre_code'></span><div class='code  code_collapsed ' title='Подсветка синтаксиса доступна зарегистрированным участникам Форума.' style=''><div><div><ol type="1"><div class="code_line">var</div><div class="code_line">Arr1 : array [1..x] of extended;</div><div class="code_line">Arr2 : array [1..y] of extended;</div></ol></div></div></div></div><script>preloadCodeButtons('1');</script><br>
<br>
Известно, что числа в каждом массиве упорядочены по увеличению.<br>
<br>
<strong class='tag-b'>Задача</strong><br>
За один цикл пройтись по числам в массивах и вывести все элементы по увеличению.<br>
<br>
Пример<br>
[1, 2, 9] &amp; [1, 5, 6, 9] =&gt; 1,1,2,5,6,9,9.<br>
<br>
Постановщик задачи уверяет что она решаема.<br>
Меня смутило требование 1 цикла, ведь, вобще говооря, x&lt;&gt;y.<br>
<br>
Можно, впринципе, пройтись и одним циклом<br>
[CODE=pas]<br>
for i:=1 to max(x,y) do begin<br>
//<br>
end;<br>
[CODE]<br>
<br>
Но из-за разных X/Y можно наткнуться на несуществующие элементы массивов. Вставлять Try..Except не представляеться разумным.]]></description>
        <author>Delphist</author>
        <category>ПОМОЩЬ СТУДЕНТАМ</category>
      </item>
	
      </channel>
      </rss>
	