• Дана строка. Поместить все цифры строки в отдельную строку. Паскаль. Помогите пожалуйста, решить!

Ответы 1

  • vars1, s2: string;i: integer;beginreadln(s1);for i:=1 to length(s1) doif s1[i] in ['0'..'9'] thens2 := s2 + s1[i];writeln(s2);end.
    • Автор:

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

Войти через Google

или

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

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

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