Как написать: если 'a' не равно 0, то повторить выполнение код

Тема в разделе "Delphi - Система", создана пользователем -, 21 фев 2008.

  1. Гость

    Как написать: если 'a' не равно 0, то повторить выполнение кода

    Например есть код.

    Нужно записать так:

    Если 'а' не равно 0, то выполнять этот код по кругу до тех пор, пока 'a' не станет равно 0:
    тут какой-то код...
    Если равно, то выполнить этот код:
    И тут код...
     
  2. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    Код (Text):
    While a <> 0 do begin
    циклический код который надо повторять
    end;

    if a = 0 then begin
    код если а =0
    end;
     
  3. Гость

    ПасиБ!
     
  4. astronom

    astronom Гость

    sax_ol , педагогичный ответ :D
    А вообще, если человек что-то спрашивает, то это не так уж и плохо :)
    p.s. разумеется, надо предусмотреть изменение переменной 'a' в цикле и выход из цикла, иначе окончание работы программы придется ждать до следующего отключения электричества. :)
     
  5. morpheus

    morpheus скриптописец

    Регистрация:
    7 авг 2006
    Сообщения:
    3.927
    Симпатии:
    0
    харе флеймить

    Для: astronom
    Вы просто не знаете кто есть такой Дима-ламо, потому иногда лучш жевать
     
Загрузка...

Поделиться этой страницей