Вычисления длин медиан треугольника

@яяядиана · Регистрация: 14.03.2011

Студворк — интернет-сервис помощи студентам

Составьте программу вычисления длин медиан треугольника, у которого длины сторон a, b, c.
Примечание. Медианой называется отрезок, соединяющий любую вершину треугольника с серединой противоположной стороны. Медиану, соединяющую вершину треугольника А с серединой стороны а, можно найти по формуле:

d=0.5* sqrt(2*sqr(b) + 2*sqr(c)- sqr(a))

@SunEclipse · 15.03.2011, 00:05

Pascal
1
2
3
4
5
6
7
8
9
uses crt;
var a,b,c:integer; d:real;
begin clrscr;
write('Введите значения a,b,c: ');
readln(a,b,c);
d:=0.5*sqrt(2*sqr(b)+2*sqr(c)-sqr(a));
writeln('Длина медианы= ',d:2:2);
readln;
end.

@яяядиана · 15.03.2011, 00:10 **[ТС]**

а с процедурой или функцией чтоб 3 медианы считал...

@romcka-x · 15.03.2011, 00:17

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
uses crt;
var
a,b,c:integer;
ma,mb,mc:real;
begin
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
mc:=sqrt((2*a*a+2*b*b-c*c)/4);
ma:=sqrt((2*c*c+2*b*b-a*a)/4);
mb:=sqrt((2*a*a+2*c*c-b*b)/4);
writeln('Медианы равны: ',ma:1:3,' | ',mb:1:3,' | ',mc:1:3);
end.

@яяядиана · 15.03.2011, 00:23 **[ТС]**

а как это будет с процедурой или функцией???

@romcka-x · 15.03.2011, 00:28

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
uses crt;
var
a,b,c,a1,b1,c1:integer;
ma,mb,mc:real;
function f:real;
begin
f:=sqrt((2*a1*a1+2*b1*b1-c1*c1)/4);
end;
begin
write('a='); readln(a);
write('b='); readln(b);
write('c='); readln(c);
a1:=a;b1:=b;c1:=c; mc:=f;
a1:=c;b1:=b;c1:=a; ma:=f;
a1:=a;b1:=c;c1:=b; mb:=f;
writeln('Медианы равны: ',ma:1:3,' | ',mb:1:3,' | ',mc:1:3);
readln
end.

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 12.02.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами и вызывать обработчики событий столкновения. . . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 11.02.2026 Содержание блога Библиотека SDL3 содержит встроенные инструменты для базовой работы с изображениями - без использования библиотеки SDL3_image. Пошагово создадим проект для загрузки изображения. . .	SDL3 для Web (WebAssembly): Загрузка PNG с прозрачным фоном с помощью SDL3_image 8Observer8 10.02.2026 Содержание блога Библиотека SDL3_image содержит инструменты для расширенной работы с изображениями. Пошагово создадим проект для загрузки изображения формата PNG с альфа-каналом (с прозрачным. . .	Установка Qt-версии Lazarus IDE в Debian Trixie Xfce volvo 10.02.2026 В общем, достали меня глюки IDE Лазаруса, собранной с использованием набора виджетов Gtk2 (конкретно: если набирать текст в редакторе и вызвать подсказку через Ctrl+Space, то после закрытия окошка. . .
SDL3 для Web (WebAssembly): Работа со звуком через SDL3_mixer 8Observer8 08.02.2026 Содержание блога Пошагово создадим проект для загрузки звукового файла и воспроизведения звука с помощью библиотеки SDL3_mixer. Звук будет воспроизводиться по клику мышки по холсту на Desktop и по. . .	SDL3 для Web (WebAssembly): Основы отладки веб-приложений на SDL3 по USB и Wi-Fi, запущенных в браузере мобильных устройств 8Observer8 07.02.2026 Содержание блога Браузер Chrome имеет средства для отладки мобильных веб-приложений по USB. В этой пошаговой инструкции ограничимся работой с консолью. Вывод в консоль - это часть процесса. . .	SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .

@яяядиана 0 / 0 / 0 Регистрация: 14.03.2011 Сообщений: 3

	Вычисления длин медиан треугольника 14.03.2011, 23:58. Показов 16651. Ответов 5 Метки нет (Все метки) Составьте программу вычисления длин медиан треугольника, у которого длины сторон a, b, c. Примечание. Медианой называется отрезок, соединяющий любую вершину треугольника с серединой противоположной стороны. Медиану, соединяющую вершину треугольника А с серединой стороны а, можно найти по формуле: d=0.5* sqrt(2sqr(b) + 2sqr(c)- sqr(a)) 0

@яяядиана 0 / 0 / 0 Регистрация: 14.03.2011 Сообщений: 3
	15.03.2011, 00:10 [ТС]
	а с процедурой или функцией чтоб 3 медианы считал... 0

@яяядиана 0 / 0 / 0 Регистрация: 14.03.2011 Сообщений: 3
	15.03.2011, 00:23 [ТС]
	а как это будет с процедурой или функцией??? 0

Вычисления длин медиан треугольника

Решение