Скажите шестнадцатеричная форма внутреннего представления целого числа:A соответствует десятисному числу B A=1111

Показать ответ

Ответ:

tinapai

27.03.2020 02:51

Чтобы квадрат вписался в круг, его диагональ должна быть равна диаметру круга. Если трактовать "уместиться" как "пролезть", то диагональ должна быть меньше диаметра..
Формулы площадей квадрата S₁ и круга S₂ известны, что легко позволяет нам найти нужное условие.
$\displaystyle S_1=a^2 \to a=\sqrt{S_1}; \ d=a \sqrt{2}= \sqrt{2S_1} \\ S_2=\frac{\pi D^2}{4} \to D=\sqrt{\frac{4S_2}{\pi}}; \\ d\ \textless \ D \to \sqrt{2S_1}\ \textless \ \sqrt{\frac{4S_2}{\pi}}; \ 2S_1\ \textless \ \frac{4S_2}{\pi} \ \to \ \boxed{\pi s_1\ \textless \ 2S_2}$
Если нужно, чтобы случай, когда квадрат вписан в круг тоже учитывался, строгое неравенство следует заменить нестрогим.

// 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
Квадрат не умещается в круге

0,0(0 оценок)

Ответ:

maz156

16.03.2023 15:54

Полное решение:

var
a,b,c:integer;
begin
writeln('Введите три числа: ');
readln(a,b,c);
if (a>b)and(a>c) then writeln('Первое число наибольшее')
                   else if (a<b)and(a<c) then writeln('Первое число наименьшее')
                                         else writeln('Первое число со средним значением');
if (b>a)and(b>c) then writeln('Второе число наибольшее')
                   else if (b<a)and(b<c) then writeln('Второе число наименьшее')
                                         else writeln('Второе число со средним значением');
if (c>a)and(c>b) then writeln('Третье число наибольшее')
                   else if (c<a)and(c<b) then writeln('Третье число наименьшее')
                                         else writeln('Третье число со средним значением');
end.

Проверил на Паскале

0,0(0 оценок)

Популярные вопросы: Информатика