Напишите, сколько знаков # будет выведено на экран после выполнения данного алгоритма.
a:=40;
repeat
writeln\('\#'\);
a:=a div 6;
until \(a=0\)