Программирование,задача. Вводится значение r. Найдите Sкв,описанного около окружности,если r больше 10, в противном случае вычислите Sкв,вписанного в эту окружность.
Программирование,задача. Вводится значение r. Найдите Sкв,описанного около окружности,если r>10, в противном случае вычислите Sкв,вписанного в эту окружность.
Гость
Ответ(ы) на вопрос:
Гость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.
Гостьпоучись в академии шаг на третем году скажут
Не нашли ответ?
Похожие вопросы