Никто из школьников не решил! Ч 2
rem Никто олимпиадную задачу не решил!
print " N t r v "
print "---------------------"
for t0=1 to 79
for r0=1 to 79
t=t0/180*pi
r=r0/180*pi
v=180/pi*atan((1/tan(t)-1)*tan(r)+1)+10^(-10)
if v>0 then
if abs(v-int(v))<0.0000001 then
s=s+1
print s using "####",t0 using "####";
print r0 using "####",v using "####"
fi:fi
next r0
next t0
нашел аж 188 целочисленных вариантов! Все их привожу в иллюстрации. Номер варианта из упомянутого ранее видео оказался 150-тым. Строка выделена красной рамкой.
24 июня 2023 г.
Свидетельство о публикации №223062401608