дано прямокутник з периметром 28.48 и сторону а 5.6.Знайти другу сторону прямокутника і його площю.
Решить нужно в паскале,даю много баллов,прошу нужна помошь.

После этого окно закрываеться,и вылезает опять сама среда програмирования

Вы какую версию паскаля используете?

var a,b,p,s:real;beginwrite('p = ');readln(p);write('a = ');readln(a);b:=(p-2*a)/2;s:=a*b;writeln('b = ',b:4:2,' s = ',s:5:3);end.Пример:p = 28.48a = 5.6b = 8.64 s = 48.384