Чтобы квадрат вписался в круг, его диагональ должна быть равна диаметру круга. Если трактовать "уместиться" как "пролезть", то диагональ должна быть меньше диаметра.. Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие. Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016 begin var s1:=ReadReal('Площадь квадрата'); var s2:=ReadReal('Площадь круга'); if pi*s1<2*s2 then Writeln('Квадрат умещается в круге') else Writeln('Квадрат не умещается в круге') end.
Тестовое решение: Площадь квадрата 24.6 Площадь круга 28.4 Квадрат не умещается в круге
149 -- 10 100010101 - 2 225 - 8 95 - 16 Это можно сделать с калькулятора в windows, просто выбрать вид - программистский. А если учитель не принимает один ответ без решения, тогда так. Переводишь 149 в двоичное либо делением на 2 до тех пор, пока остаток от деления не будет меньше 2, получаешь 10010101, для перевода этого числа в восьмеричную делишь его на группы по три символа, начиная слева 010 010 101, если не хватило по три, добавляешь нолик слева. Переводишь каждую пару просто в десятичное, ответ будет из трех символов 2 2 5 это восьмеричная. Для шестнадцатиричной берем то же двоичное и разбиваем на группы по 4 символа справа 1001 0101, получилось 2 четверки, переводим обе в десятичную, но если при переводе получится что-то больше 9, заменяем это на букву. 10 - А, 11 - В15 - F. у нас получилось 9 5.
begin
readln(a,b,c);
if a<=b then min :=a
else min := b;
if c<min then min:=c;
writeln('Минимальное число = ',min);
end.