В ряд выписаны в порядке возрастания числа, делящиеся на 9: 9, 18, 27, 36, …. Под каждым числом этого ряда записана сумма его цифр. На каком месте в ряду впервые встретится число 54? Ответ запишите в виде числа.
More Questions From This User See All
Answers & Comments
Verified answer
Var a,b,s,n:integer;begin
a:=9;
s:=9;
n:=1;
while s<>54 do
begin
n:=n+1;
a:=a+9;
b:=a;
s:=0;
while b<>0 do
begin
s:=s+b mod 10;
b:=b div 10;
end;
end;
writeln('a = ',a,' n = ',n);
end.
Результат:
a = 999999 n = 111111