Наталья
Помогите пожалуйста решить задачу в Pascal.
"Корабль получил пробоину радиусом r метров. В мастерской имеется жестяной квадратный лист со стороной A см. Определить (автоматически) удастся ли этим листом заделать пробоину "
"Корабль получил пробоину радиусом r метров. В мастерской имеется жестяной квадратный лист со стороной A см. Определить (автоматически) удастся ли этим листом заделать пробоину "
Var a,r:integer;
Begin
Read(r);
Read(a);
If a=2r then write('получится') else write('нет');
End.