Составьте программу вычисления длины окружности и площади круга по заданному радиусу.
Составьте программу вычисления длины окружности и площади круга по заданному радиусу.
Гость
Ответ(ы) на вопрос:
ГостьVAR
a,b,c:integer;
BEGIN
WriteLn('Введите Радиус окружности:');
Read(a);
Write('Длина окружности: ');
WriteLn(2*Pi*a);
Write('Площадь круга: ');
WriteLn(Pi*Sqr(a));
END.
Не нашли ответ?
Похожие вопросы