Ответ :

IUV
я тоже считаю что к:=к+3
ведь через 3 часа происходит деление (увеличение числа в 2 раза)

если оставить к:=к+1, то в ответе должно быть к:=3*к
В блок-схеме конечно же ошибка, k должно изменяться с шагом 3. Но само решение корявое, поскольку вместо цикла можно сразу найти решение по формуле
[tex]S=3 \times log_2X=3\times \frac{lnX}{ln2} [/tex]
Так что весь цикл можно заменить одним единственным оператором присваивания.