• Когда мы переписываемся, мы часто используем цифры в нашем тексте. Вам дано одно предложение на английском языке. Нужно найти все цифры, которые встречаются в этом предложений хотя бы один раз.

Ответы 2

  • spasibo
    • Автор:

      gaugew1mf
    • 6 лет назад
    • 0
  • Var  S : String;  m : Set of Char;  i : Byte;Begin  m:=[];  Readln(S);  For i:=1 to Length(S) do If S[i] in ['0'..'9'] then Include(m,S[i]);  For i:=0 to 10 do If Chr(Ord('0')+i) in m then Write(i);  Writeln;end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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