Организовать ввод радиуса. определить длину окружности

L=2*Pi*r
на pabc прога выглядит так:
var l,r:real;
const
Pi=3.14;
begin
write(Введите радиус: );
read(r);
l:=2*Pi*r;
write(Длина окружности: ,l);
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.