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

Question

Информатика

Грапа

8 марта, 14:50

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

+2

Ответы (1)

Знаете ответ на вопрос?

Софа · Answer 1

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.