![]() |
label
Естб ли в мидлет паскаль такая фишка как на паскале???как организовать это дело?
|
Re: label
В мидлет паскале этой фишки нет. Юзай процедуры и функции...
|
Ответ: label
А если кроме как label другого выхода нет? Как обойти например?
Необходимо осуществить немедленный выход из множества рекурсивных функций, вызывающих друг друга) |
Ответ: label
Можно например сделать так:
program test; var p:boolean; procedure rec (a:integer; var p:boolean); begin if p then exit; {ну тут какой-то оператор} a:=a+1; {тут параметр выхода} if a > 100 then p:=true; rec (a,p); end; begin p:=false; reC (1,p); end. |
Ответ: label
здесь уже предлагали
repeat ... if a=1 then break; //пропустить нижележащий участок ... if a=2 then break; //пропустить ... ... ... until true; |
Ответ: label
надо бы метки и ГоТо в 3й версии добавить!
|
Часовой пояс GMT +4, время: 18:16. |
vBulletin® Version 3.6.5.
Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Перевод: zCarot