Question

определите значение переменных s после выполнения фрагмента программы при а=63 p:=a; s:=0; while p>0 do begin s:=s+p mod 10; p:=p div 10; end;​