Uses crt;
Const
p=3.14;
r=12;
begin
clrscr;
writeln('При r=',r,' площадь круга равна: ',p*r*r:0:2);
readln
end.
Похожие записи/страницы:
- Даны два круга с общим центром и радиусами R1 и R2 (R1 > R2). Найти площади этих кругов S1 и S2, а также площадь…
- Вычисление длины и площади окружности - Pascal(Паскаль)
- Определить площадь круга, длину окружности и объем шара, используя в качестве радиуса сумму знаков трехзначного…
- Дана длина L окружности. Найти ее радиус R и площадь S круга, ограниченного этой окружностью, учитывая, что L =…
- Дана площадь S круга. Найти его диаметр D и длину L окружности, ограничивающей этот круг, учитывая, что L = π·D,…
- Известны площадь круга S и площадь квадрата S. Определить: поместится ли квадрат в круг - Pascal(Паскаль)
- Дан номер одного из этих элементов и его значение. Вывести значения остальных элементов данной окружности (в том…
- Дан радиус окружности.Найти длину и площадь круга - Pascal(Паскаль)