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

Мистер фокс придумал новый генерировать пароли. он создает длинную строку из произвольного количества символов, а затем вычеркивает из нее некоторые символы. оставшаяся строка (без пробелов) будет паролем. чтобы пароль был надежным, нужно, чтобы в нем было побольше символов, а чтобы его легче было запоминать, нужно, чтобы он был палиндромом, то есть, читался слева направо так же, как справа налево. дана строка tab! c11! bc? bc0caaa1bt00 мистеру фоксу вычеркнуть некоторые символы, чтобы получился пароль-палиндром наибольшей возможной длины. в качестве ответа укажите длину этого пароля. в данной вам строке есть только латинские строчные буквы, цифры и знаки ! и ? . комментарий. максимальная длина пароля-палиндрома, который можно получить из строки ! ш13ал? а7770ш19, равна 5. то есть, для этой строки в качестве ответа нужно было бы вывести число 5. а сами пароли могут быть разными, например: шалаш или 1а? а1

👇
Ответ:
savchenko29
savchenko29
12.03.2020

tab!c11!bc?bc0caaa1bt00

t a b ! c 1 1 ! b c ? b c 0 c a a a 1 b t 0 0

t b 1 b c ? b c 1 b t

ответ: 11

4,6(58 оценок)
Открыть все ответы
Ответ:
Артур15051505
Артур15051505
12.03.2020
Var x1,y1,x2,y2,v1,v2:real;
begin
  writeln("введите количество метров пробегания жирафа");
  read(y1);
  writeln("введите, за сколько секунд он должен пробежать");
  read(x1);
  writeln("введите количество метров пробегания зайца");
  read(y2);
  writeln("введите, за сколько секунд он должен пробежать");
  read(x2);
  v1:=y1/x1;
  v2:=y2/x2;
  if v1>v2 then 
  begin
     writeln("жираф чемпион");
  end
  else if v1<v2 then 
  begin
     writeln("заяц чемпион");
  end
  else
  begin
    writeln("победила дружба);
  end;
end;
4,4(24 оценок)
Ответ:
лев234325
лев234325
12.03.2020
//PascalABC.NET (версия 3.1, сборка 1210 от 29.03.2016)
const
  m = 10;

var
  t: array[1..m] of integer;
  i, n, nm, sm: integer;

begin
  //Заполняем массив сл.числами и подсчитываем
  //количество элементов и среднее арифметическое
  //согласно условию задачи
  for i := 1 to m do
  begin
    t[i] := random(-20, 20);write(t[i]:4);
    if (i > 1) and (i <= m) then
      if t[i] > t[i - 1] then n := n + 1
      else if t[i] < t[i - 1] then begin
        sm := sm + t[i];nm := nm + 1;
      end;
  end;
  writeln;
  writeln('число элементов больших предыдущего = ', n);
  writeln('ср. арифметическое элементов меньших предыдущего = ', sm / nm);  
 
end.

Тестовое решение:
    6  13  19   8 -19 -11 -20 -15 -19 -13
число элементов, больших предыдущего = 5
среднее арифметическое элементов, меньших предыдущего = -12.5
4,6(68 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ