Составте алгоритм с предусловием

По человечески: мама можно взять конфетку? (условие) да - берешь конфетку и опять вопрос, можно еще конфетку? нет - обижаешься на всех и вся и идешь к себе по иероглифам (1 <= m) (m - любое значение) y:=1; k:=0;  While y<=M do  Begin     y:=y*3;     k:=k+1;  End;