Скачать: CL | DM;

sos   Найти похожие ветки 

← →
ANDREI   (2004-12-01 14:21) [0]

Привет мастера! Необходимо в цикл repeat _ until вложить еще один такойже цикл (repeat) но при попытке это реализовать приложение сразу зависает. Как этого избежать? Заранее благодарен.

---

← →
Алхимик ©   (2004-12-01 14:24) [1]

> но при попытке это реализовать приложение сразу зависает.
> Как этого избежать?

Воспользоваться отладчиком.
Сами по себе вложенные циклы зависания не вызывают.

---

← →
Amoeba ©   (2004-12-01 14:26) [2]

Код в студию!

---

← →
Andrei   (2004-12-01 14:44) [3]

например вот так:

button1.click(XXXXXXXXXX);
var a,b:integer;
begin
a:=0;
b:=0;
repeat
inc(a);
repeat
inc(b);
until a=10;
until b=100;
end;

это к примеру в проге все сложнее, но зависает даже это.

---

← →
Sphinx   (2004-12-01 14:49) [4]

> repeat
> inc(a);
> repeat
> inc(b);
> until a=10;
> until b=100;

Сами внимательно посмотрите что написали :)

> repeat
> inc(b);
> until a=10;

вот и причина зависания...

---

← →
oxffff   (2004-12-01 14:50) [5]

Уважаемый Андрей!

button1.click(XXXXXXXXXX);
var a,b:integer;
begin
a:=0;
b:=0;

 repeat
 inc(a); //////// нужно inc(b)

   repeat
   inc(b); //////// нужно inc(a)
   until a=10;

 until b=100;
end;

---

← →
Andrei   (2004-12-01 14:53) [6]

Всем огромное спасибо!!!

---

← →
Andrei   (2004-12-01 15:09) [7]

Ребта прошу прощения я ошибся в написании вопроса. Все правильно
я так и пишу:

button1.click(XXXXXXXXXX);
var a,b:integer;
begin
a:=0;
b:=0;

repeat
inc(b)

  repeat
 inc(a)
  until a=10;

until b=100;
end;

зависает именно это....

---

← →
Алхимик ©   (2004-12-01 15:12) [8]

> button1.click(XXXXXXXXXX);
> var a,b:integer;
> begin
> a:=0;
> b:=0;
>
> repeat
> inc(b)
>
>   repeat
>  inc(a)
>   until a=10;
>
> until b=100;
> end;
>
> зависает именно это....


Вот именно это зависать не должно.

---

← →
Плохиш ©   (2004-12-01 15:14) [9]

или a,b не integer ;-)

---

← →
begin...end ©   (2004-12-01 15:15) [10]

> [8] Алхимик ©   (01.12.04 15:12)

Должно.

> [7] Andrei   (01.12.04 15:09)

Перед вложенным циклом обнуляйте переменную a.

---

← →
begin...end ©   (2004-12-01 15:15) [11]

> [8] Алхимик ©   (01.12.04 15:12)

Должно.

> [7] Andrei   (01.12.04 15:09)

Перед вложенным циклом обнуляйте переменную a.

---

← →
Алхимик ©   (2004-12-01 15:17) [12]

> [11] begin...end ©   (01.12.04 15:15)
> > [8] Алхимик ©   (01.12.04 15:12)
>
> Должно.


Угу. :) Глазастый.

---

← →
Andrei   (2004-12-01 15:17) [13]

>>Вот именно это зависать не должно.
А зависает!!!
>>или a,b не integer ;-)
и a и b сто пудов Integer.

---

← →
Алхимик ©   (2004-12-01 15:18) [14]

> [13] Andrei   (01.12.04 15:17)
> >>Вот именно это зависать не должно.
> А зависает!!!


Вот воспользовался бы отладчиком - не пришлось бы мне краснеть. :)

---

← →
Gloomer ©   (2004-12-01 15:29) [15]

прав как всегда  begin...end ©   (01.12.04 15:15) [11]
правильно будет
var a,b:integer;
begin
b:=0;
repeat
inc(b)
a:=0;
 repeat
inc(a)
 until a=10;
until b=100;
end;

---

← →
Andrei   (2004-12-01 15:30) [16]

С П А С И Б О ! ! !

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.021 c