Дана программа, определите, что будет напечатано в результате ее выполнения, если х=7690 var x, L, M: integer; begin readln(x); L:=0; M:=0; while x > 0 do begin L:= L + 1; M:= M + x mod 10; x:= x div 10; end; writeln(L); write(M); end.
More Questions From This User See All