Какое число следует за числом 1 в двоичной системе счисления? а) такого числа нетю б)1 в)2 г)10

г) 10

сперва 01 потом 10 потом 11 

Код: procedure tform1.button1click(sender: tobject); var kolo,kolp,i,n: integer; a: array[1..1000] of integer; begin n: =memo1.lines.count; kolo: =0; kolp: =0; for i: =1 to n do   begin   a[i]: =strtoint(memo1.lines[i-1]);   if a[i]> 0 then kolp: =kolp+1;   if a[i]< 0 then kolo: =kolo+1;   end;   showmessage('количество положительных: '+inttostr(kolp));   showmessage('количество отрицательных: '+inttostr(kolo)); end;     оформление:

1)Цикл с постусловием — цикл, в котором условие проверяется после выполнения тела цикла. Отсюда следует, что тело всегда выполняется хотя бы один раз. В языке Паскаль этот цикл реализует оператор repeat.. until ; в Си — do…

2)Безусловные циклы

Цикл с предусловием

Цикл с постусловием

Цикл с выходом из середины

Цикл со счётчиком (или цикл для)

Совместный цикл

До выход из цикла

Пропуск итерации

4)Если заранее неизвестно число повторений цикла, то можно использовать цикл с постусловием. Сначала выполняется тело цикла, затем проверяется условие. Если оно ложно, то выполняется тело цикла. Если условие истинно, то цикл считается выполненным.