Ответ : Найти сможешь тут https://youtu.be/jMGLi-f1RVg
@GeorgHelp
Вообще-то, в окружность можно вписать квадрат только одного размера. Каждая его диагональ будет равна диаметру окружности, то есть 2R. Площадь квадрата , где d - диагональ квадрата. d = 2R, значит
Программа на PascalABC может иметь вид:
Program KWADRAT;
var
r: real;
begin
var s:='**** -=Alphaeus=- ****'; var k:=0;
for k:=1 to 22 do begin write(s[k]); sleep(47) end;
writeln; write('Введите R = '); readln(r);
writeln('Площадь вписанного квадрата равна ',2*r*r);
end.
1. X
2. >
3. >
4. !
Искомое к.с. достигается таким вот простым набором команд!
Делим 9 монет на 3 кучи по 3 монеты
берем 2 кучи по 3 монеты и взвешиваем
если они равные,то монета в третьей кучке
Берем 3 кучу и делим её на еще 3 монеты
в итоге берем 2 монеты и взвешиваем,если они равные,то фальшивая 3 монета
Понял?
354
235, 15
472, 35
417, 165
317, 35