Число в системе счисления по основанию p-1 записывается как 23, а в системе с основанием р+1 - как 16. - id643210420200512 от aidochka82 12.05.2020 01:16

Question

Информатика: Число в системе счисления по основанию p-1 записывается как 23, а в системе с основанием р+1 - как 16. укажите десятичную запись числа

aidochka82 · Accepted Answer

Было занятно сделать все это в виде одного оператора)))

// PascalABC.NET 3.2, сборка 1439 от 09.05.2017
// Внимание! Если программа не работает, обновите версию!

begin
ReadlnString('->').ToWords(Arr(',','.'))
      .Select(w->w.Where(c->Pos(c,'аеёиоуыэюя')>0).GroupBy(x->x)
      .Select(x->(x.Key,x.Count)).Where(x->x[1]>2)).Where(x->x.Count>0)
      .SelectMany(x->x).Select(x->x.Item1).Distinct.OrderBy(x->x)
      .Println(',')
end.

Пример
-> дает,корова,молоко,длинношеее,животное,жираф,катамаран.
а,е,о

Число в системе счисления по основанию p-1 записывается как 23, а в системе с основанием р+1 - как 16. укажите десятичную запись числа

MOGZ ответил