Определите значение переменной S после выполнения фрагмента программы при указанных значениях a. Нужно подробное решение, а не только заполнить таблицу, последние p,s,p>0 это столбцы таблицы
p:=а;
s:=0;
while p>0 do
begin
s:= s + p mod 10
p:= p div 10
end;
а=109
p s p>0
1) а = 23
p s p>0
23 0 true
2 3 true
0 5 false => s = 5
2) a = 32
p s p>0
32 0 true
3 2 true
0 5 false => s = 5
3) a = 109
p s p>0
109 0 true
10 9 true
1 9 true
0 10 false => s = 10
Объяснение: