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

На каждое задание нужно создать отдельный файл в Питоне и написать в нем программу. Все файлы сохранить в архив и отправить мне личным сообщением. В модуле re есть еще несколько функций для работы с регулярными выражениями. Одна из них – это split(pattern, string). Она работает также, как строковый метод split но делит принятую строку не по разделителю, а по шаблону.
Дан набор строк в которых могут содержаться числа в двоичной системе счисления:
'1 "Hey!" 10 "Stop that!" 11 "Your vest looks stupid" 100 101 110'
'1000 "Did you kick someone in the face today?" 1001 1010 "Will I be making dinner then?!" 1011 110'
'10000 "Nice Beard" 1111 "Are you wearing denim shorts?" 1110 1101'
''
1
Напишите функцию, которая принимает строку и возвращает сумму всех двоичных чисел, присутствующих в строке. Сумма должна быть в десятичной системе. Если в исходной строке чисел нет или передана не строка, то функция должна вернуть -1. (Для конвертации в десятичное число из строки используйте int(‘строка’, 2) здесь второй аргумент – это основание системы счисления из которой нужно провести преобразование)
Предположим, что существуют «чистые строки» - это строки, в которых есть только буквы и пробелы. Никаких других символов в них быть не должно. Написать программу, которая загрузит содержимое приложенного файла, «очистит» все строки, создаст файл Result.txt и запишет результат в этот файл.
Дана строка, в которой буква h встречается как минимум два раза. Разверните последовательность символов, заключенную между первым и последним появлением буквы h, в противоположном порядке.
Вход: In the hole in the ground there lived a hobbit
Выход: In th a devil ereht dnuorg eht ni eloh ehobbit

👇
Открыть все ответы
Ответ:
lizokf8
lizokf8
25.03.2022
Delphivar  a1, a2: array of integer;  n, c, i: integer; procedure PrintDescending(a: array of integer); var i, j, max: integer; begin  for i := 0 to Length(a) - 1 do  begin    for j := 0 to Length(a) - 1 do      if a[j] > a[max] then max := j;    Write(a[max], ' ');    a[max] := -10001;  end; end; begin  //Запрашиваем ввод длины массива:  Write('Введите длину массива: ');  Read(n);    //Устанавливаем длину массивов:  SetLength(a1, n);  SetLength(a2, n);    //Заполняем первый массив случайными числами:  for i := 0 to n - 1 do    a1[i] := Random(201) - 100;    //Заполняем второй массив только нечётными элементами первого:  for i := 0 to n - 1 do    if Abs(a1[i]) mod 2 = 1 then      begin      a2[c] := a1[i];      c := c + 1;    end;    //Урезаем второй массив:  SetLength(a2, c);    //Выводим первый массив:  for i := 0 to n - 1 do    Write(a1[i], ' ');  Writeln;    //Выводим второй массив в порядке убывания:  if c = 0 then Write('Нечётных элементов нет.')  else PrintDescending(a2); end.

Пример работы:


Дан одномерный массив целого типа. Получить другой массив, состоящий только из нечетных чисел исходн
4,7(53 оценок)
Ответ:
T4ffy
T4ffy
25.03.2022
Delphivar  a1, a2: array of integer;  n, c, i: integer; procedure PrintDescending(a: array of integer); var i, j, max: integer; begin  for i := 0 to Length(a) - 1 do  begin    for j := 0 to Length(a) - 1 do      if a[j] > a[max] then max := j;    Write(a[max], ' ');    a[max] := -10001;  end; end; begin  //Запрашиваем ввод длины массива:  Write('Введите длину массива: ');  Read(n);    //Устанавливаем длину массивов:  SetLength(a1, n);  SetLength(a2, n);    //Заполняем первый массив случайными числами:  for i := 0 to n - 1 do    a1[i] := Random(201) - 100;    //Заполняем второй массив только нечётными элементами первого:  for i := 0 to n - 1 do    if Abs(a1[i]) mod 2 = 1 then      begin      a2[c] := a1[i];      c := c + 1;    end;    //Урезаем второй массив:  SetLength(a2, c);    //Выводим первый массив:  for i := 0 to n - 1 do    Write(a1[i], ' ');  Writeln;    //Выводим второй массив в порядке убывания:  if c = 0 then Write('Нечётных элементов нет.')  else PrintDescending(a2); end.

Пример работы:


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