Var i, byear, eyear, k : integer;
Begin
read(byear, eyear);
byear := byear + 1;
for i := byear to eyear do
if (i >= 1605) and ((i - 1605) mod 10 = 0) then k:= k +1;
writeln(k);
End.
Количество символов опр. так: 2^3=8
6
.................................
Так не пойдёт?если поставить впереди но,потом нарисовать утку,две последние буквы убрать,потом нарисовать букет цветов и тоже две буквы убрать,и в конце у
2 в седьмой степени равно 128, N=128