Вопрос задан 25.10.2023 в 03:35. Предмет Информатика. Спрашивает Білак Сашка.

Известны длины сторон треугольника a, b, c. Написать программу, вычисляющую площадь этого

треугольника (по формуле Герона). Выполнить программу для исходных данных a=3, b=4, c=5. Язык Паскаль. плиз помогите я просто не понимаю как это делается
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Павлик Женя.

program GWR;

var

 p1,a,b,c,s:real;

 begin

 writeln('Введите чему равны стороны треугольников :');

 readln(a,b,c);

 p1 := (a + b + c)/ 2;

 s := sqrt(p1*(p1-a)*(p1-b)*(p1-c));

 write(s);

 end.

0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Для вычисления площади треугольника по формуле Герона в языке Pascal, вам понадобится написать программу. Вот пример программы, которая решает вашу задачу:

pascal
program CalculateTriangleArea; var a, b, c, s, area: real; begin { Введите значения сторон треугольника a, b и c } writeln('Введите длину стороны a: '); readln(a); writeln('Введите длину стороны b: '); readln(b); writeln('Введите длину стороны c: '); readln(c); { Вычислите полупериметр треугольника } s := (a + b + c) / 2; { Вычислите площадь треугольника по формуле Герона } area := sqrt(s * (s - a) * (s - b) * (s - c)); { Выведите результат } writeln('Площадь треугольника: ', area:0:2); end.

Скопируйте эту программу в вашу среду программирования Pascal и запустите её. Она попросит вас ввести длины сторон треугольника a, b и c, а затем вычислит и выведет площадь треугольника. В вашем случае с данными a=3, b=4, c=5, программа должна вывести площадь треугольника, которая равна 6.0.

0 0

Похожие вопросы

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос