Укажите наибольшее х, при вводе которого алгоритм печатает сначала 3, а потом 4. Var x, L, M: integer; begin readln(x); L:=0; M:=0; while xgt;0 do begin L:=L+1 If Mlt;(x mod 5) then Begin M:=x mod 5 End ...

Укажите наибольшее х, при вводе которого алгоритм печатает сначала 3, а потом 4. Var x, L, M: integer; begin readln(x); L:=0; M:=0; while xgt;0 do begin L:=L+1 If Mlt;(x mod 5) then Begin M:=x mod 5 End X:=x div 5; End. Writeln (L); write(M); End

--> ЧИТАТЬ ОТВЕТ <--

© 2010-2019 «Cwetochki.ru»