Написать код программы, которая будет вычислять периметр фигуры. Program Perimeter; Var...

Question

Написать код программы, которая будет вычислять периметр фигуры. Program Perimeter; Var Begin Writeln Readln End.

Answer 1

program Perimeter;

var a, b, P: integer;

begin

write('a=');

readln(a);

write('b=');

readln(b);

P:=(a+b)*2;

writeln('P=', P);

end.

Comments

writeln а потом что?

---

В смысле?

---

('P=', P);