Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
черныйЗайка
08.10.2020 12:03 •
Информатика
Решите задачу на языке программирования Python. Дан массив А(10). Необходимо найти самый большой элемент, после чего расположить расположенные элементы по меньшей мере.
Показать ответ
Ответ:
ekaterinakorol4
12.11.2022 09:00
Прежде всего - формулы. Пусть а - длина стороны, тогда
var
a, r, rr, h, s: real;
begin
Write('Введите длину стороны треугольника: ');Readln(a);
r := sqrt(3) * a / 6;
rr := 2 * r;
h := 3 * r;
s := a * h / 2;
Writeln('Радиус вписанной окружности ', r);
Writeln('Радиус описанной окружности ', rr);
Writeln('Высота треугольника ', h);
Writeln('Площадь треугольника ', s);
end.
Тестовое решение:
Введите длину стороны треугольника: 10
Радиус вписанной окружности 2.88675134594813
Радиус описанной окружности 5.77350269189626
Высота треугольника 8.66025403784439
Площадь треугольника 43.3012701892219
0,0
(0 оценок)
Ответ:
Анна20041288
12.11.2022 09:00
Program triangle;
label undf;
var side, h, S, Ro, Rv: real;
begin
undf: writeln('Введите сторону треугольника:');
readln( side );
h := sqrt( sqr( side ) - ( sqr( side ) / 4) ); // расчет высоты
S := ( ( 1 * side) / 2 ) * h; // расчет площади
Rv := ( side / 2 ) * sqrt( ( 2 * side - side ) / ( 2 * side + side ) ); // расчет вписанной окружности
Ro := ( sqr( side ) / sqrt( sqr( 2 * side) - sqr( side ) ) ); // расчет описанной окружности
// вывод данных
writeln('Высота: ', h);
writeln('Площадь: ', S);
writeln('Радиус вписанной окружности: ', Rv);
writeln('Радиус описанной окружности: ', Ro);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Greeegooo
05.05.2023 21:38
составить программу Задача: Для десяти выстрелов, координаты которых задаются с клавиатуры, вывести текстовые сообщения о попадании в мишень — область, закрашенную...
SvetaX16X
04.04.2020 23:19
с программированием (Паскаль) 2)найти сумму всех четных и произведение всех нечетных элементов в диапазоне от a до b (вводятся с клавиатуры)...
nam0
22.12.2022 07:08
Какие стандартизованные конструктивные элементы необходимы на валах при проектировании их опорных частей? ...
AlexPvP
23.04.2022 21:00
с программированием (Паскаль) 1) написать функцию, считающую n-ый элемент последовательности Фиббоначчи. первые два элемента последовательности равны 1, а каждый последующий...
Colnre
12.06.2020 09:52
Программа должна запрашивать категорию и сумму, пока вместо категории не будет введено стоп-слово «off». цикл while без break 1. Когда вместо категории введено слово...
ketti00000
16.05.2023 01:42
(Код на c++)(ООП)Передать результат операции умножения по значению....
derevyaniy02
19.05.2020 18:01
Внести изменения в реализацию класса А , чтобы в классе В были возможны указанные действия: (проект протестировать) class A {int a,b,c; public: A(); A(int,int,int);...
Саша22122004
21.01.2023 09:56
Питон. «Угадай число» Сделайте так, чтобы во время игры пользователь увидел за- гадку о задуманном компьютером числе....
soneta991
14.06.2020 21:19
¥☐ü_ç☐_☐∏_∲Λ┏_Λ_₪Λ¥_Λ⊥_↻┏¥þ⊥☐ расшифровать...
Вовчик256
28.01.2023 21:53
№1. информационный объём одного сообщения составляет 0,5 кбайт, а другого - 500 байтов. на сколько байтов информационный объём первого сообщения больше объёма второго...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var
a, r, rr, h, s: real;
begin
Write('Введите длину стороны треугольника: ');Readln(a);
r := sqrt(3) * a / 6;
rr := 2 * r;
h := 3 * r;
s := a * h / 2;
Writeln('Радиус вписанной окружности ', r);
Writeln('Радиус описанной окружности ', rr);
Writeln('Высота треугольника ', h);
Writeln('Площадь треугольника ', s);
end.
Тестовое решение:
Введите длину стороны треугольника: 10
Радиус вписанной окружности 2.88675134594813
Радиус описанной окружности 5.77350269189626
Высота треугольника 8.66025403784439
Площадь треугольника 43.3012701892219
label undf;
var side, h, S, Ro, Rv: real;
begin
undf: writeln('Введите сторону треугольника:');
readln( side );
h := sqrt( sqr( side ) - ( sqr( side ) / 4) ); // расчет высоты
S := ( ( 1 * side) / 2 ) * h; // расчет площади
Rv := ( side / 2 ) * sqrt( ( 2 * side - side ) / ( 2 * side + side ) ); // расчет вписанной окружности
Ro := ( sqr( side ) / sqrt( sqr( 2 * side) - sqr( side ) ) ); // расчет описанной окружности
// вывод данных
writeln('Высота: ', h);
writeln('Площадь: ', S);
writeln('Радиус вписанной окружности: ', Rv);
writeln('Радиус описанной окружности: ', Ro);
end.