Выяснить, сколько раз в натуральном числе встречается его максимальная цифра. например в числе 581088 - 3 раза, в числе 4537 - 1 раз. Сделать нужно через while или repeat until. Желательно с объяснениями
Выяснить, сколько раз в натуральном числе встречается его максимальная цифра. например в числе 581088 - 3 раза, в числе 4537 - 1 раз. Сделать нужно через while или repeat until. Желательно с объяснениями
Гость
Ответ(ы) на вопрос:
Гостьvar k, s, i: integer;beginreadln(k);s:=k mod 10;i:=0;while k<>0 do begin
k:=k div 10;
if s0 do begin//цикл идет до тех пор пока не закончатся цифры в k
k:=k div 10;// отбрасываем цифру от числа
if s
Не нашли ответ?
Похожие вопросы