Стораж обходит прямоугольный участок за 0.5 часа его скорость 5км/час длинна одной из старон участка известна-вводится с клавиатуры. вычеслить площадь участка

За 0,5 часа сторож проходит 2,5 км - это периметр участка P
P=2*(a+b)=2.5, значит b=(2.5-2*a)/2
Составим программу:
program rt45;
var a,b,s,p:real;
begin
 readln(a);
 b:=(2.5-2*a)/2;
 s:=a*b;
 write('Площадь=',s:6:2);
end.