Просмотр задания
Укажите наибольшее х, при вводе которого алгоритм печатает сначала 3, а потом 4.

Var x, L, M: integer;
begin
readln(x);
L:=0; M:=0;
while x>0 do
begin
L:=L+1
if M
As No
11 июня 2016
Ответы (2)
As No # 11 июня 2016 в 19:54 0
Продолжение следует
If M<(x mod 5) then
Begin
M:=x mod 5
End
X:=x div 5;
End.
Writeln (L); write(M);
End
ELENA IVANOVA # 14 июня 2016 в 18:09 0
В пятеричной сс - 444, в десятичной - 124
Ответить
Перевести число из в Результат: 510 = 1012