самый большое число номера месяца - 31. ближайшее число обозначающее целую степень двойки - это 32. подставим его в формулу
N=2^i, 32=2^i, 2^5=2^i отсюда i=5 бит следовательно, пятибитового кода будет достаточно для хранения информации о порядковом номере дня любого месяца в году
Можно решить пропорцией
1500 - 75
х - 50
Один из вариантов, все, что разобрал.
Var
a:array[1..100] of integer;
i:integer;
begin
for i:=1 to 100 do
begin
a[i]:=random(100)+1
if ((i mod 2)=0) then write(a[i]," ");
end;
end.