Дни недели пронумерованы следующим образом 1-понедельник, 2-вторник,3-среда,7-воскресенье. дано целое число лежащее в диапазоне от 1 до 365. определить номер дня недели к-го дня года, если известно, что первое января было вторником.

Внеделе семь дней, поэтому решение выполняется на основе нахождения  остатка целочисленного деления от номера дня на 7. такой остаток находится в пределах от 0 до 6, а для нашей нумерации нужны значения от 1 до 7, поэтому полученный остаток будем увеличивать на единицу. если 1 января вторник, то есть день недели с номером 2, то первым понедельником будет 7 января, вторым 14 января и т.д. 1 января (k=1) при делении на 7 даст в остатке 1 и при сдвиге остатка на 1 (см. выше), получим 2 (вторник). 7 января даст остаток 0 и после сдвига получим 1 (понедельник), что и требовалось. 1. современное короткое, эффективное, но требующее определенных знаний решение pascalabc.net 3.3.5, сборка 1659 от 09.04.2018 внимание! если программа не работает, обновите версию! begin   var d: ='понедельник вторник среда четверг пятница суббота воскресенье'.towords;   writeln(d[readinteger('введите номер дня') mod 7]) end. примеры введите номер дня 215 суббота введите номер дня 14 понедельник 2. более близкое к выше алгоритму решение begin   var n: =readinteger('введите номер дня');   n: =n mod 7+1;   case n of   0: writeln('воскресенье');   1: writeln('понедельник');   2: writeln('вторник');   3: writeln('среда');   4: writeln('четверг');   5: writeln('пятница');   6: writeln('суббота')   end end. 3. типовое школьное решение var   n: integer; begin   write('введите номер дня');   read(n);   n: =n mod 7+1;   case n of   0: writeln('воскресенье');   1: writeln('понедельник');   2: writeln('вторник');   3: writeln('среда');   4: writeln('четверг');   5: writeln('пятница');   6: writeln('суббота')   end end.

объем информации одного измерения будет равна 7 бит ();

станция сделала 8192 измерения - умножим на кол-во информации, необходимое для записи одного измерения:   8192*7=57344 бит=7168 байт = 7 килобайт

ответ 138 номер последнего

решение 1024/8+10=128+10=138

 

1 байит= 8 бит