Составить программу которая вычисляет площадь треугольника

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (a,b,c):=ReadReal3;
var p:=(a+b+c)/2;
write(S=,sqrt(p*(p-a)*(p-b)*(p-c)));
end.

Uses crt;
var a,b,c:integer;
p:real;
begin
writeln(Введите a); readln(a);
writeln(Введите b); readln(b);
writeln(Введите c); readln(c);
p := (a+b+c)/2;
// √(p·(p — a)·(p — b)·(p — c))
writeln(Площадь: , sqrt(p*(p — a)*(p — b)*(p — c)));
end.

Отв. дан 2018-11-04 11:14:52 Приск

Источник: otvechu.com

Напишите функцию, вычисляющую площадь треугольника по целочисленным координатам его вершин

Напишите функцию, вычисляющую площадь треугольника по целочисленным координатам его вершин. Напишите про­грамму вычисления площади четырёхугольника по координатам его вершин с помощью этой функции.

Ответ

program ploshad_treugolnika;
var

Нахождение площади треугольника в С++


ха, ya, xb, уb, хе, ус, xd, yd: integer; // Исходные данные
аb, ас, bс, p: real; // Промежуточные величины
s4: real; // Результат
function s3 (x1, y1, x2, y2, x3, y3: integer): real;
var d1, d2, d3, p, rez: real;
begin
d1:=sqrt(sqr(x1-x2)+sqr(y1-y2));
d2:=sqrt(sqr(x3-x2)+sqr(y3-y2));
d3:=sqrt(sqr(x1-x3)+sqr(y1-y3));
p:=(d1+d2+d3)/2;
rez:=sqrt(p*(p-d1)*(p-d2)*(p-d3));
s3:=rez
end;
begin
writeln (‘ха и yа’);
readln (ха, yа);
writeln (‘xb и уb’);
readln (xb, yb);
writeln (‘xc и ус’);
readln (xc, ус);
writeln (‘xd и yd’);
readln(xd, yd);
s4:=s3(xa, ya, xb, yb, xc, уc) + s3(ха, ya, xd, yd, xc, ус);
writeln (‘S = ‘, s4:6:2);
end.

Опубликовано: 14.01.2019
Обновлено: 14.01.2019

Источник: schoolotvety.ru

Напишите программку вычисления площади прямоугольного треугольника значения катетов которого A

Напишите программу вычисления площади прямоугольного треугольника значения катетов которого A и B вводятся с клавиатуры.
Итог вывести в последующим виде: lt;Для значений катетов 4 и 6 площадь прямоугольного треугольника одинакова 12gt;

  • Анна Рябиничева
  • Информатика
  • 2019-05-01 03:32:17
  • 23
  • 1
Читайте также:
Мультиварка редмонд проблемы с программой

Эвелина 2019-05-01 03:39:58

Если не спутал с формулой, то вот
var a,b:integer;
s:real;
begin
read(a,b);
s:=a*b/2;
writeln(‘lt;Для значений катетов ‘,a,’ и ‘,b,’ площадь прямоугольного треугольника равна ‘,s,’gt;’);
end.

Тамара Домашова 2019-05-01 03:48:42
А почему четверочка?:(
Анжелика Лихванчук 2019-05-01 03:57:29
Кхе кхе не знаю)
Аделина Жалелетдинова 2019-05-01 03:59:51
так это безопасность)
, оставишь ответ?
Похожие вопросы

Вычисление площади треугольника через основание и высоту в программе на языке Паскаль

Вопросы ответы

У вас классный сайт! Продаёте? Добрый день, меня зовут Николай — я владелец нескольких интернет — проектов. Ищу новые

Николай Александрович Карфополитский

«Статистика приведена за 2005 год» В 2005 году не было стольких возможностей для получения работы не требующей вышки(да

Источник: obrazovalka.com

Рейтинг
( Пока оценок нет )
Загрузка ...
EFT-Soft.ru