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

VarR,s:real;BeginReadln(R);S:=0;If R>10 thens:=4*R*R else s:=2*R*R;Writeln(s);End.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку