Вычислить площадь ромба, если известны длины его диагоналей. Записать в виде программы.

var  a, b: real;begin  Write('Введите через пробел длины диагоналей ромба: ');  Readln(a, b);  Writeln('Площадь ромба равна ', a * b / 2:0:4)end.Тестовое решение:Введите через пробел длины диагоналей ромба: 13.6 17.4Площадь ромба равна 118.3200