До начала каникул остается D дней. Определите сколько полных недель и сколько дней до начала каникул.

Выделите операторы программы, необходимые для решения этой задачи.

Program holiday;
Var D : integer; // Дано
week, day: integer; // Найти
Begin
[ Readln / Writeln / Integer] (D);
week := [ D div 7 / D mod 7 / D ⁄ 7 ];
day := [ D mod 7 / D div 7 / M mod 7 / M div D];
[ writeln / readln] (‘Всего ’ [ week / D / day / 7] ,’недель и ’ , [ day / D / 7], ‘ дней’ )
End.

290*39*67=757770 - всего символов

для кодирования  757770 символов потребуется   757770 байтов

757770байт < 1,44    мбайт

да, книга поместиться на дискетку

11000 (2) = 30 (8) = 18 (16) = 24 (10)

100111 (2) = 47 (8) = 27 (16) = 39 (10)

10100011 (2) = 243 (8) = а3 (16) = 163 (10)

101010101010 (2) = 5252 (8) = (16) = 2730 (10)

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

такой алгоритм является линейным, или последовательным. то есть в нём отсутствует   процесс передачи информации о состоянии объекта к объекту.