Вход
Регистрация
Спроси Mozg AI
М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
.....больше.....
..меньше..
lidakirillina
05.03.2021 18:03 •
Информатика
Для чого використовується заголовок форми?(Access) Для чого використовується примітка форми? Access)
Для чого використовується область даних у формах? Access)
👇
Увидеть ответ
Открыть все ответы
Ответ:
Sunshinesun88
05.03.2021
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.
4,6
(84 оценок)
Ответ:
СашаЩербина
05.03.2021
Прежде всего - формулы. Пусть а - длина стороны, тогда
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
4,8
(97 оценок)
Это интересно:
О
Образование-и-коммуникации
27.10.2021
Как вести дневник: польза для здоровья и советы по созданию своего...
С
Стиль-и-уход-за-собой
08.07.2022
Как правильно рисовать кошачий глаз при помощи подводки для глаз?...
К
Компьютеры-и-электроника
07.06.2022
Как просто и быстро очистить Корзину на iPhone...
Ф
Финансы-и-бизнес
22.04.2022
Как открыть предприятие малого бизнеса: полный гайд...
Т
Транспорт
29.01.2021
Как правильно заботиться о мотоцикле и сделать его долговечным...
Д
Дом-и-сад
08.01.2020
Как подготовить квартиру к отъезду: советы от профессионалов...
З
Здоровье
03.04.2021
Как вылечить прищемленный палец: лечение дома и медицинские советы...
С
Семейная-жизнь
28.05.2021
Как помочь родителям, которые похоронили своего ребенка: советы и рекомендации...
К
Компьютеры-и-электроника
26.03.2023
Как изменить проверочный номер для кода безопасности iCloud на iPhone...
З
Здоровье
02.09.2020
Польза и способы приема пчелиной пыльцы...
Новые ответы от MOGZ: Информатика
авдруг
26.04.2021
Последовательность фибоначчи определяется так: а(0)=1, а(1)=1, а(к)=а(к-1)+а(к-2) при к 2. дано n, вычислить а(n) (в паскале)...
bon332
16.05.2021
Сформировать массив с random от -30 до 30.размер 10 элементов .сколько в массиве отрицательных элементов?...
Артёмка110
04.09.2020
Натуральное число n задано суммой n=77*8^1000+124. количество единиц в двоичном представлении этого числа...
yanchikkostyas
21.01.2022
Впаскале . дано натуральное число n. вычислить : s=1/3^2+1/5^2+1/7^2++1/(2n+1)^2...
Ksiloffie
11.09.2020
Кто ответит первый тот красавчик...
Lambik290
13.01.2021
Ребят в этом я не разбираюсь...
Татьяна4222
15.07.2021
Задание по биологии 9 класс Заполнить таблицу...
privetloll
21.05.2021
Какое вооружение Ракетных войск стратегического назначения вы знаете?...
GlendaRei
25.04.2023
сделать инглиш и 3c look at ex 3b again. Answer these questions. Write yes or no....
оченьнеочень
25.07.2022
1. Розставте коефіцієнти в схемах реакцій та вкажіть реакції в результаті яких: 1) утворюється основа; 2) утворюється кислота а) P2O5 + H2O = H3PO4; б) ВаО + Н2О...
MOGZ ответил
1. В чем основные различия между модифика- циями и мутациями?...
Read the text and find out if the following sentences are true...
Конфликты описание монолог диалог поступки психологии героев...
Задание по обществознанию. В каких значениях употребляется слово...
Произведи морфологический разбор местоимения. Пример: «В наши...
1)Обчислити напругу на першому резисторі,якщо всі резистори однакові,сила...
Как рассуждения о «реальной» и «фантастической» грязи в романе...
Центральный угол на 30◦ больше острого вписанного угла, опирающегося...
6,4(y-12,8)=3,2 УРАВНЕНИЕ РЕШИТЕ...
Как изменится произведение двух десятичных дробей,если в одном...
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ
Оформи подписку
О НАС
О нас
Блог
Условия пользования
Авторское право
Политика конфиденциальности
Предпочтения cookie-файлов
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
App
Вход
Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ
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.