Задание:
Сколько понадобится пятерок, чтобы записать в десятичной системе счисления все натуральные числа от 1 до 55555555 включительно? (Последнее число состоитиз 8 пятерок.)
Решение:
Сегодня был такой вопросответ: 716052 var x,k,j: longint; s: string; begin k: =0; s: ='; for x: =1 to 555555 do begin str (x,s); for j: =1 to length (s) do if (s[j]='5') or (s[j]='4') then inc (k); s: ='; end; writeln (k); end.
Знаете другой ответ?