Поделитесь своими знаниями, ответьте на вопрос:
Можете с тестом по информатике? readln: (a); s:=0; p:=a; while p>0 do begin S:=S+p mod 10; p:=p div 10; end; end. 1.Определите значение переменной S после выполнения фрагмента программы при а=23 2.Определите значение переменной S после выполнения фрагмента программы при а=109