Var
i : Integer;
begin
for i := 10 to 99 do
if (i div 10 - i mod 10 = 1) or (i mod 10 - i div 10 = 1) then <span>Writeln(i);
</span> Readln;
<span>end.</span>
Минимальным будет 5, ибо отрезок AF будет наименьшим из всех возможных.
Всего символов: 290*39*67=757770 символов.
Если это просто символы типа char кодировки ASCII, то так как char имеет размер 1 байт, то книга занимает 757770 байт, или 757770/8=6062160 бит
Если 1 символ = 8 бит = 1юбайту, то:
2,7 Кбайт =2,7 *1024 байта= 2764 символа
если 1 символ =16 битам= 2 байтам, то:
2,7*1024 :2 =1382 символа
1. Удалять файл, точно не выяснив, обязательно ли это следует делать.
2. Давай файлу имя, которое не поясняет его содержание.
3. Сохранять файл в той папку, где его потом будет трудно найти.
4. Удалять или перемещать файлы, находящие в папках прикладных программ -- это может привести к тому, что программы перестанут работать.