Var
i:integer;
begin
readln(i);
if i<=7 then
case i of
1:writeln('Это понедельник');
2:writeln('Это вторник');
3:writeln('Это среда');
4:writeln('Это четверг');
5:writeln('Это пятница');
6:writeln('Это суббота');
7:writeln('Это воскресенье');
end
else
writeln('Число слишком большое');
<span>end.</span>
1.
begin
var a,b:real;
read (a,b);
writeln ('Периметр = ',(a+b)*2,' Площадь = ',a*b);
end.
Поясню.
Строка "итог" – это ответ проводника о том, кто туземец.
Значит, если проводник сказал, что туземец правдолюб, проводник всегда правдолюб
1) Для (101; 1000) в 2 сс.
110, 111 в 2 сс
Для [101;1000] в 2 сс.
101, 110, 111, 1000 в 2 сс
2) Для (76; 102) в 8 сс.
77, 100, 101 в 8 сс
Для [76; 102] в 8сс.
76, 77, 100, 101, 102 в 8 сс
3) Для (1A; 1F) в 16 сс.
1B, 1C, 1D, 1E в 16 сс
Для [1A; 1F] в 16 сс.
1A, 1B, 1C, 1D, 1E, 1F в 16 сс
Основывается на таблице сложения для каждой сс.
То есть по сути, каждый раз мы делаем +1.
Код - это номер участника, состоящий из трех цифр.
Выходит тогда если их 800, то номер 800-того будет 11 0010 0000 = кодируется 10-тью битами.
Следовательно любая одна запись (пусть это будет даже первая, она равна 00 0000 0001) будет занимать место в памяти в размере 10 бит.
Данные о 320 учащихся, займут 320*10=3200 бит, или 3.2 килобита информации.