Работа с контурной картой. Русь в период раздробленности. 30-е гг. XII в. — первая треть XIII в. 1. Обозначьте чёрными линиями границы русских княжеств и земель,

Program PR;
var
  i,n:integer;
  p:real;
begin
write('Введите N: ');
readln(n);
p:=1;
for i:=1 to n do
  p:=p*(2*i)/(2*i+1);
writeln('P=',p);
readln;
end.