• На строки:
    Дан текст из букв и цифр. Заменить все нули в тексте на букву А,а все единицы на букву М. Подсчитать число замен. Нужно написать Код + блок схему 

Ответы 6

  • Сложно. Во-первых, писанины много, во вторых, придется заново блок-схему делать? Так что это отпадает.
  • И, я вам 100% говорю: не знаете Replace, значит, не знаете и
    • Автор:

      saul
    • 6 лет назад
    • 0
  • var s:=ReadlnString('>'); var na:=s.Where(c->c='0').Count;
    • Автор:

      devynkszz
    • 6 лет назад
    • 0
  • В следующий раз указываете корректно версию и объем своих знаний.
    • Автор:

      cadence
    • 6 лет назад
    • 0
  • В каждой школе учат по-своему, а мысли читать люди пока еще не научились.
  • // PascalABC.NET 3.2, сборка 1363 от 17.12.2016// Внимание! Если программа не работает, обновите версию!begin  var s:=ReadlnString('>');  var na:=s.Where(c->c='0').Count;  s:=s.Replace('0','А');  var nm:=s.Where(c->c='1').Count;  s:=s.Replace('1','M');  Writeln(s);  Writeln('Заменено нулей- ',na,', единиц- ',nm)end.Пример> ТурбоПаскаль не поддерживается с 1994г, сейчас 2016г.ТурбоПаскаль не поддерживается с M994г, сейчас 2АM6г.Заменено нулей- 1, единиц- 2
    answer img
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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