Задание
Напишите, сколько звёздочек будет выведено на экран после выполнения данного алгоритма.
a := 15;
while \(a\\gt 0\) do
begin
writeln\('\*'\);
a := a div 2;
end;