Форум: "Начинающим";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];

Вниз

Функции и процедуры   Найти похожие ветки 

← →
Tar   (2007-03-05 07:14) [0]

Приветствую всех! Мне нужна функция, обеспечивающая повтор обработки определенного участка кода, т.е. не циклы типа "while","repeat", а именно такая функция (по моему, есть такая встроенная функция/процедура), которая обеспечивает выполнение определённого участка кода, помогите пожалуйста.

---

← →
SlymRO ©   (2007-03-05 07:15) [1]

:label
goto label;
:)

---

← →
Tar   (2007-03-05 07:22) [2]

Да, именно эта процедура мне была нужна, а подскажите оформление пожалуйста.

---

← →
SlymRO ©   (2007-03-05 07:24) [3]

program Project1;
{$APPTYPE CONSOLE}
label label1;
begin
label1:
 writeln("label1");
goto label1;
end.


---

← →
Tar   (2007-03-05 07:27) [4]

Благодарствую

---

← →
MBo ©   (2007-03-05 08:17) [5]

А чем тебя цикл не устраивает?

---

← →
Elen ©   (2007-03-05 08:25) [6]

> А чем тебя цикл не устраивает?

Скорее всего циклы не устраивают его преподавателя :)

---

← →
ЮЮ ©   (2007-03-05 08:32) [7]

> Скорее всего циклы не устраивают его преподавателя :)


Тогда goto не устроит и подавно :)

---

← →
Квэнди ©   (2007-03-05 08:36) [8]

за Goto надо руки отрывать =)

---

← →
SlymRO ©   (2007-03-05 08:37) [9]

ЮЮ ©   (05.03.07 8:32) [7]
Тогда goto не устроит и подавно
Можно канечна и так:
program Project1;
{$APPTYPE CONSOLE}
procedure Loop;
begin
 writeln("Loop")
 Loop;
end;
Loop;
end.
тока оверфлоу замучает

---

← →
Elen ©   (2007-03-05 08:39) [10]

> SlymRO ©   (05.03.07 08:37) [9]

Вы ему еще и про рекурсию раскажите. Так для отчетности :)

---

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

Форум: "Начинающим";
Текущий архив: 2007.03.25;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.46 MB
Время: 0.057 c