Строку for var.. надо поменять на
for var n:=k to 1 do
В чертеж конечно.............
Мудреная схема, надеюсь, что правильно
3*260=780(руб) - стоят все 3 книги
780-600=180(руб)-не хватает
600-100\%
180-х\%
НИЖЕ - ДРОБЬ
х=100*180
_______
600
х=зо
ОТВЕТ : минус 30\%
Давно!
64 символа в алфавите => 6 бит на символ, т.к. 2^6 = 64
6*100 = 600 бит