Javascript must be enabled in your browser to use this page.
Please enable Javascript under your Tools menu in your browser.
Once javascript is enabled Click here to go back to �нтеллектуальная Кобринщина

Использование константы PI

Задача:

Найти длину и площадь окружности, используя встроенную в язык программирования Pascal константу PI.

Программа на языке Паскаль:

var r,l,s: real;

begin

    write('radius: ');

    readln(r);

     l:= 2*PI*r;

    s:= PI*r*r;

     writeln('PI=',PI);

    writeln('circuit: ',l:7:2);

    writeln('square:  ',s:7:2);

end.