Использование константы 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. |
