Числа, которые при делении на 500 дают в остатке 9 это 509, 1009, 1509, 2009 и т.д. Максимальное число, которое можно записать девятью битами - 256+128+64+32+16+8+4+2+1=511. Поэтому число 509 наиболее подходящее для решения нашей задачи.
Ответ: 509(10) и 111111101(2)
С проверочными данными сами разбирайтесь...
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)
begin
var a:=ArrFill(ReadInteger('n='),ReadInteger('m=')*60);
Range(1,a.Length-1).ForEach(t->begin a[t]:=a[t-1]+10 end);
a.Println; a.Sum.Println;
end.
Пример:
n= 5
m= 10
600 610 620 630 640
51 ч 40 мин
</span>
Бублічистичний, науковий, політичний, морально етичний, економічний