Показать сообщение отдельно
  #3  
Старый 19.05.2009, 15:15
Аватар для Aristarh Dark
Aristarh Dark Aristarh Dark вне форума
Модератор
 
Регистрация: 07.10.2005
Адрес: Москва
Сообщения: 2,907
Версия Delphi: Delphi XE
Репутация: выкл
По умолчанию

Если я правильно понял задачу то:
Код:
for i:=1 to 9 do
  for j:=i to 9 do
    if A[i]=B[j] then
      A[i]:=j;
__________________
Некоторые программисты настолько ленивы, что сразу пишут рабочий код.

Если вас наказали ни за что - радуйтесь: вы ни в чем не виноваты.
Ответить с цитированием