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.

Answer 2

writeln а потом что?

Answer 3

В смысле?

Answer 4

('P=', P);