Нужна программа на языке паскаль, : дан список из n фамилий. определить, содержится ли в списке указанная фамилия; если да, то указать номер, под которым она встречается в списке первый раз, если же такой фамилии нет, то добавить ее к первоначальному списку. исходный список . новую фамилию внести в список после самой длинной фамилии.

👇

Ответ:

84737263748

13.05.2020

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

begin
var n:=ReadlnInteger('Количество фамилий:');
var L:=ReadSeqString('Вводите фамилии построчно:',n).ToList;
var f:=ReadlnString('Искать фамилию:');
var i:=L.FindIndex(w->w=f);
if i>=0 then Writeln('Номер в списке- ', i+1)
else begin
    i:=L.Select(w->w.Length).ToArray.IndexMax;
    L.Insert(i+1,f);
    Writeln('Вставлена после фамилии ',L[i]);
    L.Println
    end
end.

Примеры

Количество фамилий: 6
Вводите фамилии построчно: Иванов
Петрова
Сидоров
Сидорчук
Ножкина
Жук
Искать фамилию: Ножкина
Номер в списке- 5

Количество фамилий: 6
Вводите фамилии построчно: Иванов
Петрова
Сидоров
Сидорчук
Ножкина
Жук
Искать фамилию: Ложкина
Вставлена после фамилии Сидорчук
Иванов Петрова Сидоров Сидорчук Ложкина Ножкина Жук

4,6(43 оценок)

Открыть все ответы

Ответ:

turivecpolina

13.05.2020

1. Закончите предложение: «Алгоритмом называется …»
г) конечная последовательность шагов в решении задачи, приводящая от исходных данных к требуемому результату
2. Что можно считать алгоритмом?
в) кулинарный рецепт
3. Закончите предложение: «Блок-схема – форма записи алгоритмов, при которой для обозначения различных шагов алгоритма используются ….»
в) геометрические фигуры
4. Закончите предложение: «Геометрическая фигура параллелограмм
используется в блок-схемах для обозначения ….
г) выполнения действия
5. У какого из известных Вам исполнителей следующая СКИ: вверх, вниз, вправо, влево, закрасить?
а) РОБОТ
6. В следующем списке 12 2,3 0 5 -5 98,0 целых величин:
в) 4
7. Каждая команда алгоритма должна определять однозначное действие исполнителя. Это свойство алгоритма называется…
б) точность
8. Укажите формальных исполнителей:
г) автомат на конвейере наполняет бутылки лимонадом
9. Для многократного выполнения одинаковых действий в алгоритме нужно использовать
б) цикл

10. После выполнения фрагмента алгоритма вида:
S:=0
i:=1
пока i<4
нц
i:=i+1
S:=S+1
кц
значение переменной s равно…. б) 3
11. Переменная х получила значение, равное -6. Какое значение получит переменная у после выполнения ветвления:
если а меньше или равно 3
то у:=а*а
иначе у:= 2а-3
все
в) 36

4,5(13 оценок)

Ответ:

catpolina21

13.05.2020

Код#include <iostream>#include <string>#include <functional>std::string switch_first_and_last(std::string N) { auto L = N.size() - 1; return N[L] + N.substr(1, L - 1) + N[0];}bool take_correct_number(int &number, const std::function<bool(int)>& Q) { do { std::cin >> number; if (!Q(number)) { std::cout << "Try again." << std::endl; continue; } break; } while (true); return true;}int main() { int number; take_correct_number(number, [](int x){return x > 9;}); std::cout << switch_first_and_last(std::to_string(number)) << std::endl;}
Программа получает на вход натуральное число, большее 9. Вывести число, которое получится в результа