Составить программу ** паскале найти периметр 5 угольника

Question

Составить программу на паскале найти периметр 5 угольника

Answer 1

Программа принимает на вход сторону правильного пятиугольника и вывод его периметр

var
    a: real;

begin
    readln(a);
    writeln('P=', 5 * a);
end.