Вычислить длину окружности и площадь круга. радиус должен вводиться с клавиатуры
Вычислить длину окружности и площадь круга. радиус должен вводиться с клавиатуры
Гость
Ответ(ы) на вопрос:
Гостьprogram round;
const pi = 3.14;
var R, S, l: real;
Begin
Write ('Введите радиус');
Read(R);
S := pi * sqr(R);
l := 2 * pi * R;
Writeln('Площадь круга ', S);
Writeln('Длина окружности ', l);
end.
Не нашли ответ?
Похожие вопросы