Используя эту блок-схему, разработайте рациональные алгоритмы получения из числа 0 чисел...

Question

Используя эту блок-схему, разработайте рациональные алгоритмы получения из числа 0 чисел 1024 и 500. ( см. фотографию)

---

Answer 1

While (a<>0) do begin 
if a mod 2 = 0 then a:=a div 2   
else  a:=a-1;