• Помогите пожалуйста. Ребята, буду очень благодарен.
    Дан массив из n слов произвольной длины (длина слова не превышает 80 символов). Символами могут быть только заглавные латинские буквы. Найти и вывести все гласные буквы (без повторений), которые встретились в двух самых длинных словах.

Ответы 1

  • PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018Внимание! Если программа не работает, обновите версию!begin  var n:=ReadlnInteger('Количество слов в массиве:');  var a:=ReadArrString('Введите слова, каждое с новой строки:',n);  var s:=a.Select(w->(w,w.Length));  var lm:=s.Max(t->t[1]);  s.Where(t->t[1]=lm).Take(2).Select(t->t[0]).JoinIntoString('')      .Where(c->c in 'AEIOUY').Distinct.Printlnend.
    answer img
    • Автор:

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

Войти через Google

или

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

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

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