Question

Помогите написать программу
l=2PR

Answer 1

var i,r:integer;
   p:real;
begin
write ('Введите число,r')
p:=3.14;
i=2*r*p;
writeln (Ответ ' ',i)
readln(i);
end;