• Pascal ABC! Решите!
    Заменить группы подряд идущих нулей на один нуль.

Ответы 3

  • Извините, у меня версия 2.2 сборка 765
    • Автор:

      ian701
    • 6 лет назад
    • 0
  • А где об этом написано? Когда решение дали, уже поздно писать "А мне надо по-другому" - для всяких указаний есть условие задание. Написано PascalABC - и только...
  • // PascalABC.NET 3.1, сборка 1230 от 27.04.2016begin  var s:=ReadlnString('>');  Writeln(RegEx.Replace(s,'0{2,}','0'))end.Тестовое решение> 100x100=10000; 10км=10х1000=10000(м)10x10=10; 10км=10х10=10(м)
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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