• Помогите, пожалуйста
    Сколько раз данная цифра встречается в числе?
    Паскаль АВС. Через while

Ответы 2

  • я так и думал
    • Автор:

      angus
    • 6 лет назад
    • 0
  • var a,b,k:integer;beginreadln(a,b);k:=0;while a>0 do begin if a mod 10=b then k:=k+1; a:=a div 10; end;writeln(k);end.Пример:13534 32
    • Автор:

      yadiel
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years