Задание
Написать программу нахождения периметра параллелограмма по известным сторонам \(b\) и \(m\) (\(b\) и \(m\) — целые числа, вводимые с клавиатуры).
- program perimetr;
var
begin
write('b=');
readln(b);
write('m=');
readln(m);
p:=2*(b+m);
writeln('p=',p);
readln;
end. - program perimetr;
var
b,m,p:integer;
begin
write('b=');
readln(b);
write('m=');
readln(m);
p:=2*(b+m);
writeln('p=',p);
readln;
end. - program perimetr;
var
b,m,p:integer;
begin
write('b=');
readln(b);
write('m=');
readln(m);
writeln('p=',p);
readln;
end.