Question

Информатика.  Помогите пожалуйста, все  это решается с помощью программы паскаль абц.

Answer 1

var d,l,pi: real;
begin
write ('d = '); read(d);
pi:=3.14;
l:=pi*d;
writeln ('L = ',l);
end.