Артем2357
14.03.2021 22:13

Задача A. Формат времени Имя входного файла: стандартный ввод
Имя выходного файла: стандартный вывод
Ограничение по времени: 1 секунда
Ограничение по памяти: 256 мегабайт
Вам даны два момента времени, причем гарантируется что они оба находятся в течении од-
них суток и первый из них находится строго раньше второго. По данной информации определите,
использовался ли для их записи 12 часовой или 24 часовой формат.
Напомним, что в 12 часовом формате часы записываются целыми числами с 1 до 12, в то время,
как в 24 часовом нумерация начинается с 0 до 23 включительно. Для лучшего понимания ознакомь-
тесь с тестовыми примерами.
Формат входных данных
В первой и второй строках находятся первых и второй момент времени соответственно.
Времена заданы в формате HH:MM (00 ⩽ HH ⩽ 23, 00 ⩽ MM ⩽ 59)
Формат выходных данных
В зависимости от того в каком, 12 или 24 часовом, формате может быть записано данное время,
выведите “12-hour clock” или “24-hour clock” соответственно. В случае неоднозначности выведите -
“both”. При выводе кавычки выводить не нужно.
Примеры
стандартный ввод стандартный вывод
11:00
23:50
24-hour clock
09:20
03:30
12-hour clock
06:00
12:00
both
00:00
01:00
24-hour clock
Страница

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
malika0408
23.01.2022 18:51
Никак, ведь все символы входят в алфавит и могут кодироваться разным числом байт в зависимости от мощности алфавита и правила кодирования.
Просто по коду мы не можем получить мощность алфавита и кодирования => и объем информации.

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

Преамбула — вводная часть какого-либо важного акта, международного договора, содержащая указания на обстоятельства, послужившие поводом к изданию соответствующего акта, на его мотивы и цели.
0,0(0 оценок)
Ответ:
Милена3001
18.02.2021 03:36
// PascalABC.NET 3.3, сборка 1625 от 17.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('n=');
  var v:=SeqRandom(n,-99,99).Select(t->0.1*t).ToArray;
  v.Println;
  var imin:=v.Select(t->Abs(t)).ToArray.IndexMin;
  Writeln('Номер минимального по модулю элемента- ',imin+1);
  var fn:=v.Select((x,i)->(x,i)).Where(t->t[0]<0).First[1];
  Writeln('Сумма модулей элементов после первого отрицательного равна ',
      v[fn+1:].Sum(t->Abs(t)));
  var (a,b):=ReadReal2('Введите границы интервала значений для удаления:');
  v:=v.Where(t->not t.Between(a,b)).ToArray;
  var m:=n-v.Length;
  if n>0 then begin
    SetLength(v,n);
    for var i:=v.Length to n-1 do v[i]:=0.0
    end;
  v.Println
end.

Пример
n= 15
-9.4 3.9 6.2 -2.5 -5.2 9 4.9 -9.5 4.4 2.4 -8.8 3.1 -7.7 5.6 8.9
Номер минимального по модулю элемента- 10
Сумма модулей элементов после первого отрицательного равна 82.1
Введите границы интервала значений для удаления: -20 2
3.9 6.2 9 4.9 4.4 2.4 3.1 5.6 8.9 0 0 0 0 0 0
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота