Question

Дан диаметр окружности d. Найти ее длину L. В качестве значения π использовать 3.14.Справка: L = π ∙d

Answer 1

Var
     d,l:real;

begin
    read(d);
    l:= 3.14 * d;
    write(l);
end.