Question

Разработайте программу вычисления периметра прямоугольника. Если известно, что его длина на 3 см больше ширины

Answer 1

var  P,dlina,shirina:real;begin   writeln('Введите длину');   readln(dlina);   shirina:=dlina+3;   P:=dlina*2+shirina*2;   writeln('Периметр равен ',P);end.  

Answer 2

var
P,dlina,shirina:real;
begin
writeln('Введите длину');
readln(dlina);
shirina:=dlina+3;
P:=dlina*2+shirina*2;
writeln('Периметр равен ',P);
end.

Answer 3

так какое?

Answer 4

они одинаковы

Answer 5

просто во втором понятнее