Question

ИНФОРМАТИКА!!!!.Написать программу для вычисления площади ромба (S=1/2 d1d2 ,где d1 и d2 - диагонали ромба)

Answer 1

var d1,d2:integer;
s:real;
begin
read(d1,d2);
s:=1/2*d1*d2;
write('Площадь равна ',s);
end.