Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 28.06.2010, 20:48   #1
vedro-compota
любитель-далеко не
Участник клуба
 
Аватар для vedro-compota
 
Регистрация: 13.04.2010
Сообщений: 1,156
По умолчанию Цикл FOR и рекурсия.

Всем привет на сто лет ))
Впервые сталкиваюсь с такой вот ошибкой -
Цитата:
[Pascal Warning] Unit1.pas(101): W1037 FOR-Loop variable 'i' may be undefined after loop
вот в таком вот коде ( рекурсивная процедура ) :
Код:
procedure pohod( mg: array of Telement; a,b:integer; var u: boolean);
var i: integer; 
begin
  if a=b then
  begin
    showmessage('Дойти можно! ))');
    u:=true;
  end
  else
  if mg[a].pos=false then
  begin
    for I :=0 to length(mg[a].mas)-1  do
    begin
      pohod(mg, mg[a].mas[i],b);
    end;
  end;
end;
Прошу объяснить - что не так . ЗАранее благодарю.
Красным я выделил ту строку, которую компилятор выделяет ))
прикреплю архив.
Вложения
Тип файла: zip 8.zip (30.9 Кб, 7 просмотров)
против абортов=за + жизнь;.фкн вгу;_______________________мойблг

Последний раз редактировалось vedro-compota; 28.06.2010 в 21:07.
vedro-compota вне форума Ответить с цитированием
Старый 28.06.2010, 21:39   #2
vedro-compota
любитель-далеко не
Участник клуба
 
Аватар для vedro-compota
 
Регистрация: 13.04.2010
Сообщений: 1,156
По умолчанию

ответ - pohod(mg, mg[a].mas[i],b,u);
вопрос снят ))
против абортов=за + жизнь;.фкн вгу;_______________________мойблг
vedro-compota вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Рекурсия на С++ Nitriyc Помощь студентам 0 28.04.2010 17:22
Цикл по времени - Как сделать так чтобы цикл выполнялся к примеру 10 секунд ? Anarki Общие вопросы C/C++ 3 13.11.2009 19:23
рекурсия Vital_k Паскаль, Turbo Pascal, PascalABC.NET 1 08.02.2008 13:09
Цикл с предусловием. ( цикл while) Цикл с постусловием. (цикл repeat ... until) Mr.User Помощь студентам 9 23.11.2007 01:34