Предмет: Информатика,
автор: MRUran
Вычислить площадь и периметр треугольника НОМЕР 3!!!! Помогите пожалуйста
Приложения:

huston81:
какой язык?
Ответы
Автор ответа:
0
Ответ:
Задание 3:
var
a, b, c, p, s: real;
begin
Write('Введите стороны треугольника через пробел: ');
ReadLn(a, b, c);
p := (a + b + c) / 2;
s := sqrt(p * (p - a) * (p - b) * (p - c));
WriteLn('Площадь треугольника S = ', s:0:2);
end.
Объяснение:
a, b, c, p, s: real;
begin
Write('a b c : ');
ReadLn(a, b, c);
p := (a + b + c) / 2;
s := sqrt(p * (p - a) * (p - b) * (p - c));
WriteLn('Площадь треугольника S = ', s:0:2);
end.
Похожие вопросы
Предмет: Физика,
автор: Georgan383
Предмет: Русский язык,
автор: Аноним
Предмет: Алгебра,
автор: Sanial416
Предмет: Математика,
автор: sweetpach
Предмет: Химия,
автор: KOTOП