Информатика, вопрос задал liliasira198 , 6 лет назад

домашнє завдання допоможіть

Приложения:

Ответы на вопрос

Ответил FoHapuK
2

Ответ:

1. var a, r: real;

begin

Readln (r, a);

If 2*r*r>=a*a then

Writeln ('YES')

Else

Writeln ('NO');

End.

Объяснение:

Новые вопросы