Программирование,. вводится значение r. найдите sкв,описанного - вопрос №5256074 от Кrистинkа2006 15.06.2020 02:53

Question

Информатика: Программирование,. вводится значение r. найдите sкв,описанного около окружности,если r 10, в противном случае вычислите sкв,вписанного в эту окружность.

Кrистинkа2006 · Answer

Var R,s:real; Begin Readln(R); S:=0; If R 10 then s:=4*R*R else s:=2*R*R; Writeln(s); End....

Программирование,. вводится значение r. найдите sкв,описанного около окружности,если r> 10, в противном случае вычислите sкв,вписанного в эту окружность.