var
a, b : double;
begin
writeln('Введите стороны :');
readln(a, b);
writeln('P=', (2*(a*b)):2:2);
writeln('S=', (a*b):2:2);
end.
var
a, b : double;
begin
writeln('Введите стороны :');
readln(a, b);
writeln('P=', (2*(a*b)):2:2);
writeln('S=', (a*b):2:2);
end.