Напишите программу. (в Паскале)
Дан радиус (R) окружности. Найти длину окружности (С) и площадь круга (S). С=2 ПR. S=ПR^2

program b_3;const Pi=3.1415926;var R,S,C:real;beginwrite('введите радиус окружности');readln(R);C:=2*Pi*R;S:=Pi*R*R;writeln('длина окружности=',C:6:2);writeln('площадь круга=',S:6:2);End.