тошкк
20.11.2020 15:02

с++ Ввести список, который содержит фамилию, инициалы и год рождення работников отдельного подразделения. Вывести по указанию пользователя сообщение о работниках заданного года, или список фамилий по возрастанию года.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
mihailgrand
09.01.2020 01:20
В начале в строке находилось 333 троек по 8 плюс одна 8, всего 1000 восьмерок.
1. При выполнения цикла каждая из троек 8 будет заменена на одну 9. Значит у нас получится строка длиной в 334 символа, где 333 девятки и последний символ - восьмерка
2. Далее 333 девятки заменятся на 111 восьмерок плюс последняя восьмерка - всего получим 112 восьмерок
3. Из 112 восьмерок получится 37 девяток и одна восьмерка
4. И 37 девяток получим 12 восьмерок плюс одна девятка и плюс последняя восьмерка
5. 12 восьмерок дадут 4 девятки плюс последние 9 и 8
6. И наконец получаем строку 8998
ответ: 8998
0,0(0 оценок)
Ответ:
Marymol2005
03.04.2023 06:49
// PascalABC.NET 3.3, сборка 1590 от 03.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var A:=ReadArrInteger('Введите 20 элементов массив А'+NewLine,20);
  Write('A: '); A.Println;
  var B:=A.Where((v,i)->i.IsOdd).ToArray; Write('B: '); B.Println;
  var C:=A.Where((v,i)->i.IsEven).ToArray; Write('C: '); C.Println
end.

Пример
Введите 20 элементов массив А
 -49 11 -39 15 43 -9 30 25 9 25 42 -39 -26 1 -49 -43 33 -46 -1 -24
A: -49 11 -39 15 43 -9 30 25 9 25 42 -39 -26 1 -49 -43 33 -46 -1 -24
B: 11 15 -9 25 25 -39 1 -43 -46 -24
C: -49 -39 43 30 9 42 -26 -49 33 -1
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота