М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Андрей11583
Андрей11583
03.07.2021 18:45 •  Информатика

А в городе царило смятение. Шутка сказать – средь бела дня исчез сам калиф и его первый визирь! На четвёртый день они увидели торжественное шествие, которое медленно двигалось ко дворцу. Гремели барабаны, трубили трубы, пели флейты.

– Да здравствует Мизра, властелин Багдада! – громко выкрикивали его приближенные.

Напишите функцию impostor(), которая разоблачит самозванца.

Функция принимает произвольное количество аргументов-строк и произвольное число именованных аргументов из списка:

to_reverse – если аргумент передан и имеет значение True, слово перед остальными преобразованиями нужно перевернуть задом наперед;

swap – содержит кортеж индексов двух букв, которые нужно поменять местами, если оба индекса есть в слове;

register – если аргумент имеет значение 0, все буквы привести к верхнему регистру, если 1 – к нижнему, если 2 – первую букву к верхнему, остальные к нижнему.

Функция возвращает список преобразованных слов в исходном порядке.

Пример 1
Ввод Вывод
data = ['dtltear', 'Smurd', 'oewDlb', 'tupmert', 'gnas', 'Etulf']
conditions = {'to_reverse': True, 'swap': (2, 5), 'register': 2}
print(*impostor(*data, **conditions))
Rattled Drums Blowed Trumpet Sang Flute
Пример 2
Ввод Вывод
data = ['gnoL', 'evil', 'arziM', 'droL', 'fo', 'dadhgaB']
conditions = {'to_reverse': True}
print(*impostor(*data, **conditions))
Long live Mizra Lord of Baghdad

👇
Открыть все ответы
Ответ:
sadzim
sadzim
03.07.2021

Паскаль АВС:


Program kislota;
uses crt;
const n=30;
var
  e:array[1..n] of integer;
  sum,nom,i: integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  writeln();
  writeln('Элементы массива:');
  randomize;
  nom:=0;
  for i:=1 to n do
    begin
      e[i]:=random(100)-50;
      write (e[i]:5);
    end;
  sum:=e[1]+e[2];
  for i:=1 to n-1 do
    if (e[i]+1 + e[i+1])>sum then
      begin
        sum:=e[i]+1 + e[i+1];
        nom:=i;
      end;
  writeln();
  writeln('Номер первого элемента пары с максимальной суммой: ',nom);
end.

4,8(48 оценок)
Ответ:
Biszkopt99
Biszkopt99
03.07.2021

Проверено на Паскаль АВС

Program TheStorm23;
uses crt;
var
  sum,n,i,r:integer;
begin
  writeln('*** alphaues is thinking... ***');
  writeln('***          OK             ***');
  sum:=0;
  writeln('Введите количество чисел, не превышающее 100');
  write('N = ');
  readln(n);
  if n>100 then
      writeln('Это слишком много!')
    else
      begin
        writeln('Вводите натуральные числа, не превышающие 300');
        for i:=1 to n do
          begin
            write('Ввод: ');
            readln (r);
            if r >300 then
                begin
                  writeln ('вы ввели слишком большое число');
                  writeln ('Это число не будет учтено');
                end
              else
                if r mod 6 = 0 then
                  sum:=sum+r;
          end;
        writeln();
        writeln('Сумма чисел, кратных 6, равна ',sum);
      end;
end.

4,7(35 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ