Написать программу нахождения периметра параллелограмма по известным сторонам \(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.
Задание

Написать программу нахождения периметра параллелограмма по известным сторонам \(b\) и \(m\) (\(b\) и \(m\) — целые числа, вводимые с клавиатуры).

1_3.png
  • 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.