Задача с подвохом.
Москвичей красных сказано,что три,далее же говориться о том,что из них старых вообще нет,а потому я и говорю,что новых красных москвичей ровно три
X=3*(-11)+3+6=-33+9=-24)
}=> Команда (сместиться на (24,-32)
y=3*(9)+3+2=27+5=32)
Каждый символ кодируется одним байтом. Значит, объём информации в книге равен количеству символов в ней. На странице символов 60*40=2400, а в книге всего символов 2400*150=360000байт
1,44 Мбайта память трёхдюймовой дискеты, это 1048576 байт. Считаем: 86400000: 1048576=82,3974609375. Полдискеты быть не может), поэтому будет 83 дискеты
Var A,S:longint;
Begin
Write('Введите шестизначное число: ');ReadLn(A);
S:=A mod 10;
A:=A div 10;
S:=S+A mod 10;
A:=A div 10;
S:=S+A mod 10;
A:=A div 10;
A:=(A div 100)+(A div 10) mod 10 + (A mod 10);
if A<>S then Write('Билет не является счастливым')
else WriteLn('Счастливый билет!!!')
End.