Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
kozlovadasa52
19.01.2023 04:58 •
Информатика
Заданы длины катетов прямоугольного треугольника. составьте программу,с которой определите радиус вписанной и радиус описанной окружности.
Показать ответ
Ответ:
tryx3
04.10.2020 16:58
Формулы:
с=кв.корень из (а^2+b^2)
r=(a+b-c)/2
R=c/2
var a,b,c,r1,r2: real;
begin
write ('введите катет а: ');
readln (a);
write ('введите катет b: ');
readln (b);
c:=sqrt(a*a+b*b);
r1:=(a+b-c)/2; //радиус вписанной окружности
r2:=c/2; //радиус описанной окружности
writeln;
writeln ('r = ',r1:6:2);
writeln ('R = ',r2:6:2);
end.
Пример:
введите катет а: 4
введите катет b: 6
r = 1.39
R = 3.61
***значения округлены до 2 знаков после запятой
0,0
(0 оценок)
Популярные вопросы: Информатика
elmira64
27.03.2023 10:32
F(x)=x^5-2 на промежутке [1; 2] 1-а; 2-б. таблицей...
misterstepash
08.05.2021 02:13
Дан одномерный массив m,размерностью 30.элементы массива-это целые числа из промежутка[1; 1000].напишите программу,вычисляющую количество элементов массива,меньших 100...
ОВОВОВОВо
25.05.2020 11:52
На координатной плоскости постройте и пронамеруйте точки 1 (1,1), 2(2,1), 3(2,2), 4(3,2), 5 (3,3), 6 (7,3), 7(7,1), 8 (11,1), 9 (11,6), 10 (7,6), 11 (7,4), 12 (1,4), 13...
Joan36
22.03.2021 05:46
Модель – это: а) изображение объекта, процесса или явления на бумаге; b) уменьшенное представление о реальном объекте, процессе или явлений; c) представление о реальном...
pernik20121
03.01.2023 14:06
Де не використовують інформаційні технології а) виготовлення фотоб) вирощування овочівв) розробка дизайну приміщенняг) вживання їжі...
kskskdksks
10.12.2020 09:55
2. Начертите в тетради блок-схему вычисления площади параллелограмма S по стороне аи высоте һ. Значения а и һ- это исходные данные, их требуется ввести, S- результат работы...
kir28082000
29.05.2022 02:45
Очень Запишіть код програми для малювання прямокутника об’єктом малювання має бути стрілка(turtle)...
dashanovikova03
04.12.2020 13:14
Христа ради Запишіть код програми для малювання шестикутної зірки(turtle)...
DogyStyleee
31.07.2020 10:19
С, заранее ! верна ли запись множеств : а) (8,12,16,20) = ( 12,20,16,8) б) ( 3,4,3,5) = (3,4,5)...
marinastolarova
31.07.2020 10:19
Почему при определении вида учитывают совокупность всех критериев? ?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
с=кв.корень из (а^2+b^2)
r=(a+b-c)/2
R=c/2
var a,b,c,r1,r2: real;
begin
write ('введите катет а: ');
readln (a);
write ('введите катет b: ');
readln (b);
c:=sqrt(a*a+b*b);
r1:=(a+b-c)/2; //радиус вписанной окружности
r2:=c/2; //радиус описанной окружности
writeln;
writeln ('r = ',r1:6:2);
writeln ('R = ',r2:6:2);
end.
Пример:
введите катет а: 4
введите катет b: 6
r = 1.39
R = 3.61
***значения округлены до 2 знаков после запятой