Запишите пж эту задачу на паскале: Дано натуральное число. Определить, сколько раз в нем встречается цифра 3

• Попроси больше объяснений
• Следить
• Отметить нарушение

Redbool

3 часа назад
Войти чтобы добавить комментарий

Ответы и объяснения

Я
·
новичок

Знаешь ответ? Добавь его сюда!

• Эникей
• главный мозг

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var (n,k):=(ReadInteger(‘n=’),0);
  while n>0 do begin
    if n mod 10=3 then k+=1;
    n:=n div 10
    end;
  Writeln(‘Количество троек в числе равно ‘,k)
end.

Пример
n= 163243
Количество троек в числе равно 2

• Комментарии
• Отметить нарушение

5.0

1 оценка

1 оценка

Оцени!

Оцени!
Спасибо1Войти чтобы добавить комментарий