К сожалению, программы в вашем запросе написаны некорректно. Вот правильный вариант программы нахождения периметра параллелограмма по известным сторонам b и n (где b и n - целые числа, вводимые с клавиатуры) на языке Pascal:
program PerimeterOfParallelogram;
var
b, n, p: integer;
begin
writeln('Enter the length of side b:');
readln(b);
writeln('Enter the length of side n:');
readln(n);
p := 2 * (b + n);
writeln('The perimeter of the parallelogram is: ', p);
readln;
end.
Эта программа вычисляет периметр параллелограмма по формуле: p = 2 * (b + n), где b и n - длины сторон параллелограмма, введенные пользователем с клавиатуры.
