Даны площадь круга S1 и площадь квадрат S2. Определить поместится ли квадрат в круге.

Question

Даны площадь круга S1 и площадь квадрат S2. Определить поместится ли квадрат в круге.

Comments

Паскаль?

Answer 1

Паскаль. 

var s1,s2:integer;begin  writeln('Введите площадь круга');readln(s1);  writeln('Введите площадь квадрата');readln(s2);  if s1>=s2 then writeln('Поместится') else writeln('Не поместится')end.

Comments

if sqrt(s1/Pi)>=Sqrt(2*S2) then Write('Поместится') else WriteLn('Не поместится')

---

write (sqrt(s1/Pi)>=sqrt(2*s2)? 'Поместится':'Не поместится');