casha23
19.01.2023 22:22

На каждое задание нужно создать отдельный файл в Питоне и написать в нем программу. Все файлы сохранить в архив и отправить мне личным сообщением. В модуле 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

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Keliris
23.11.2022 00:03
uses crt;
var a, b, c, i, n, j :integer;   
s :array[1..10000] of integer;
begin
      clrscr;
      writeln('Введите размер массива');
      read(n);
      for i:=1 to n do 
          begin 
          s[i]:=random(46)-15; 
          writeln ('s[', i,']=', s[i]); 
          end;
      a:=s[1];for i:=1 to n do 
          if s[i]>a then 
              begin 
              a:=s[i]; 
              b:=i; 
              end;
      writeln ('Наибольший элемент s[', b, ']=',a);
end.

P.S. Надеюсь на благодарность и лучший ответ.
0,0(0 оценок)
Ответ:
Аня79780607646
22.12.2020 00:46

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

 

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

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота