Procedure TForm1.: ..
V..r
..). 'Sender: TObject);
V = V0 + at
begin
VO:=.' *.. 1. (editi.. .:);
t:=: t! I (edit2. 6.);
a:=!. . :(edit3..:);
for i:= to ; do
begin
V:= 'C+.:.;
memo1.lines. 2 'I('t='+
L
end;
end;
O
.
(i)+' ''='+'Cauc.
:(V));​

Заполняем таблицу:

Число -> Источники (из каких чисел можно получить текущее) -> Количество получения числа.

Число 3 можно получить только одним из числа 3 с "пустой" программы.

Число 4 - из числа

Число 5- из числа

Число 6 - из числа и из числа Всего

Число 7 - из числа и из числа Всего

Некоторые варианты выбрасываем:

Число 11 - только из числа

Число 13 - только из числа

Выбрасываем также варианты, которые проходят "мимо" числа 15, например 12-13-16 или 13-14-17

Итого получаем для числа 20 (см.таблицу)

ответ: 16

1-й

Переводим 191 в двоичную систему:

Выполняем команды:

1.  10111111 -> 01011111

1.  01011111 -> 00101111

2. 00101111 + 100 = 00110011

1. 00110011 -> 00011001

1. 00011001 -> 00001100

2. 00001100 + 100 = 00010000

Переводим результат в десятичную систему:

2-й

Сдвиг на один разряд вправо в двоичной системе означает целочисельное деление на 2 (остаток отбрасываем). Выполняем команды:

1. 191 : 2 --> 95

1. 95 : 2 --> 47

2. 47 + 4 = 51

1. 51 : 2 --> 25

1. 25 : 2 --> 12

2. 12 + 4 = 16