Решить эту в для двух треугольников с катетами а, b, с, d. найти сумму площадей треугольников.(вычисление площади оформить в виде под программы-функция или процедура).

SoniaSor SoniaSor    1   22.06.2019 11:20    2

Ответы
Kseniya000001 Kseniya000001  17.07.2020 17:17
Function S_tr(a,b:integer):real;
begin
S_tr:=a*b/2
end;

var a,b,c,d:integer;
s:real;
begin
s:=0;
read(a,b,c,d);
s+=S_tr(a,b);
s+=S_tr(c,d);
writeln(s);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика