
Помагите решить задачу на Pascal.
Дано: R=18см.
Найти: длину окружности L=2пиR

Program dlina_okrujnosti;
var r,l: real;
begin
r:=18;
l:=2*pi*r;
writeln (Длина окружности равна ,l);
end.
Оцени ответ