найти длину окружности и площадь круга заданного радиуса R. в качестве значения Pi использовать 3.14

program z13;var s,l,pi:real;r:integer;beginwriteln('r=');readln(r);pi:=3.14;s:=pi*sqr(r);l:=2*pi*r;writeln('s=',s,' l=',l);readln;end.