Составить алгоритм и программу вычисления и найти длинну окружности

С++

#incude

using namespace std;

int main(){
cout.precision(5); \\кол-во символов в выводе (точность)
double r;
double pi = 3.14159265358979
cout<<"Введите радиус "<< endl;<br> cin>>r;
cout<<2*pi*r<<endl;<br> return 0;
}

Паскаль

program pr;
uses crt;
var r, pi:real;

begin clrscr;
pi:=3.141592653;
writeln('Введите радиус ');
readln(r);
writeln((2*pi*r):10:5);
end;