Какое количество информации несет сообщение о том что поезд прибывает 22 января в 19: 30

Смотря сколько уходит на символ а так 'поезд прибывает 22 января в 19: 30' (33 символа)*(кол-во для 1 символа)  если размер  символа   в кодировке в utf-8, то он весит 1 байт, к примеру

Ну если разобрать так то в условии говорят что " двое учеников говорят правду наполовину, а один – лжет.". и хотел бы приметить что в своих ответах с и в указывали на к. это бы был бы как 1 из вариантов ответа, но есть 1 но, в своих ответах с и к говорили за себя, а в говорит за других. мне кажется что тем кто соврал  в  потому-что по логике учетелей каждый должен говорить за себя.и ещё кое-что мне кажется вопрос явно не по информатике тут скорее психология ( ведь спрашивают кто соврал)

Var   a: array [1..255] of integer;   n, i, j, k, min, max: integer; begin   //ввод количества элементов в массиве   write('введите четное количество элементов: ');   readln(n);     //ввод двух чисел для диапазона случайных чисел   write('введите диапазон случайных чисел: ');   readln(min, max);     //инициализация датчика случайных чисел.   //(в pascalabc.net необязательно)   randomize;     //заполнение массива   for i : = 1 to n do   begin       a[i] : = random(max-min+1)+min;       write(a[i]: 4);   end;   writeln;     //сортировка первой половины по убыванию   for i : = 1 to ((n div 2)-1) do       for j : = 1 to (n div 2)-i do           if a[j] > a[j+1] then           begin               k : = a[j];               a[j] : = a[j+1];               a[j+1] : = k;             end;               //сортировка второй половины по убыванию   for i: =(n div 2) to n-1 do       for j: =i+1 to n do           if a[i]< a[j] then           begin               k: =a[i];               a[i]: =a[j];               a[j]: =k;           end;   //вывод массива   for i : = 1 to n do write(a[i]: 4);   writeln;   readln; end.