Question

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

Answer 1

var a,b,p,s:real;
begin
write('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.48
a = 5.6
b = 8.64 s = 48.384

Answer 2

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

Answer 3

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