Предмет: Информатика, автор: Tranquility1

Ребята, понимающие информатику. Помогите!

Приложения:

Ответы

Автор ответа: Аноним
0
// PascalABC.NET 3.1, сборка 1171 от 15.02.2016
function geron(a,b,c:real):real;
begin
  var p:=(a+b+c)/2;
  Result:=sqrt(p*(p-a)*(p-b)*(p-c))
end;

begin
  var x,y,z,t,d:real;
  Write('Введите x,y,z,t,d через пробел: ');
  Read(x,y,z,t,d);
  Writeln('S=',geron(x,d,t)+geron(d,y,z):0:4)
end.

Тестовое решение:
Введите x,y,z,t,d через пробел: 3 4 5 6 8 7
S=15.8260
Автор ответа: Tranquility1
0
Спасибо!
Автор ответа: Аноним
0
пожалуйста
Похожие вопросы
Предмет: География, автор: cerednicenkoanatolij
Предмет: Биология, автор: Ksushka2501
В7. Установите соответствие между признаками и расами, для которых они характерны.ПРИЗНАКИ                                             РАСЫА) эпикантус                                            1) австрало-негроиднаяБ) курчавые волосы                                2) монголоиднаяВ) узкий разрез глаз                                3) европеоидная          Г) неширокий, сильно выступающий нос          Д) широкие скулы         Е) толстые губыАБВГДЕ       Установите правильную последовательность биологических процессов, явлений, практических действий.В8. Установите последовательность этапов появления и эволю­ции человека, начиная с наиболее древнего.А) питекантроп                              Г) австралопитекБ) кроманьонец                              Д) неандерталецЕ) дриопитекВ9. Определите систематическое положение человека как био­логического вида, расположив таксоны в необходимой по­следовательности, начиная с вида.         А) Человек                              Д) ЛюдиБ) Приматы                           Е) ПозвоночныеВ) Человек разумный         Ж) МлекопитающиеГ) Плацентарные               З) Хордовые