Определить, можно ли квадрат со стороной a поместить в окружность заданного радиуса R?

Входные данные:

Во входном потоке задано два вещественных числа - радиус окружности R и сторона квадрата a. Значение всех исходных величин не превышает 30000.

Выходные данные:

В выходной поток вывести 'YES' или 'NO'.

Пример входного файла

2 1

Пример выходного файла

YES

Question

Информатика

Полюша

14 августа, 11:03

Определить, можно ли квадрат со стороной a поместить в окружность заданного радиуса R?

Входные данные:

Во входном потоке задано два вещественных числа - радиус окружности R и сторона квадрата a. Значение всех исходных величин не превышает 30000.

Выходные данные:

В выходной поток вывести 'YES' или 'NO'.

Пример входного файла

2 1

Пример выходного файла

YES

+2

Ответы (1)

Знаете ответ?

Маргоша · Answer 1

Программа на Паскале:

Program BiFi;

Var R, a:real;

Begin

readln (R, a) ;

if a< = (R*sqrt (2)) then writeln ('Yes') ;

else writeln ('NO') ;

readln;

end.