Определите значение переменной s при а=109 p: =a; s: =0; while p> 0 do begin s: =s+p mod 10; p: =p div 10; end;

ник3123    3   21.05.2019 12:43    18