• Напечатать в алфавитном порядке все различные строчные буквы, входящие в заданный текст из 100 литер.

Ответы 1

  • // PascalABC.NET 3.3, сборка 1625 от 17.01.2018// Внимание! Если программа не работает, обновите версию!// PascalABC.NET 3.3, сборка 1625 от 17.01.2018// Внимание! Если программа не работает, обновите версию!begin  var c:char;  var s:='';  for var i:=1 to 100 do begin    Read(c); s+=c;    end;  s.Distinct.Where(t->t<>' ').OrderBy(t->t).Println(',')end.Примера роза упала на лапу азора и карл у клары украл кораллы а клара у карла украла кларнет и это конец строкиа,е,з,и,к,л,н,о,п,р,с,т,у,ц,ы,э
    • Автор:

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

Войти через Google

или

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

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

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