Радиус, диаметр, длина окружности

[unbanned]

Условие задачи такое:

Даны r1, r2, r3.
Определить, какая из переменных является радиусом, какая – диаметром, а какая - длиной окружности.

Знаю, задача простая, но подскажите как решить рациональнее.

Была мысль найти минимальное число (это и будет радиус) и дальше проверить остальные два на "= 2R". то что не равно - будет длинной окружности. (то что равно соответственно диаметр)

но как оказалось получается очень много кода для такой простой задачи. может можно решить проще?

да, еще забыл добавить: задачу решать через условия. без массивов и циклов... задача учебная. такие требования.

[Rin]

длина окружности = 2ПR = ПD, т.к. D=2R. Вот и проверяй на это условие.

 
begin
if 2*pi*R1 = pi*R2 then writeln('r1-radius, r2-diametr, r3-dlina okrujnosti');
if 2*pi*R1 = pi*R3 then writeln('r1-radius, r3-diametr, r2-dlina okrujnosti');
if 2*pi*R2 = pi*R3 then writeln('r2-radius, r3-diametr, r1-dlina okrujnosti');
if 2*pi*R2 = pi*R1 then writeln('r2-radius, r1-diametr, r3-dlina okrujnosti');
if 2*pi*R3 = pi*R2 then writeln('r3-radius, r2-diametr, r1-dlina okrujnosti');
if 2*pi*R3 = pi*R1 then writeln('r3-radius, r1-diametr, r2-dlina okrujnosti');
end;

P.S. комбинаторика какая-то получается =).