Неужели крутейшая олимпиадная? Ч 3

Георгий Александров
Если уж решать задачу в полном объёме, то все необходимые формулы приведены в иллюстрации. Если все площади целочисленные, то в программе нужно задаться только размером "x" (в тексте проги задан x=5) и получим внушительную таблицу вариантов:

n=20
x=5
print "  N    S1    S2   S3   S  y  a  h"
print "---------------------------------"
for s1=1 to n
for s2=s1+1 to n
for s3=s2+1 to n
s=sqrt((s1+s2+s3)^2-4*s2*s3)
if s=int(s) then
y=2*s1/x
a=x*(s1-s2+s3+s)/(2*s1)
h=1/x*(s1+s2-s3+s)
rem if a=int(a) then
N=N+1
print N using "####",s1 using "####";
print s2 using "####",s3 using "####";
print s using "####",y using "####.###";
print a using "###.###",h using "####.###"
fi
rem fi
next s3
next s2
next s1

(значения y, a, h не обязательно получаются целыми)

24 января 2024 г.