Переписать в форме с предусловием (while) следующий оператор цикла Паскаля: k:=0; for i:='z' downto 'a' do k:=k+1;