Главная › Начала программирования

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

сб, 11/19/2011 - 12:20 — tech
Задача: 

Найти длину и площадь окружности, используя встроенную в язык программирования 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.