6. Вычислить площадь круга и длину окружности по введенному значению радиуса. 7. Вычислить площадь S и периметр L эллипса по введенным значениям полуосей a и b:
6. Вычислить площадь круга и длину окружности по введенному значению радиуса. 7. Вычислить площадь S и периметр L эллипса по введенным значениям полуосей a и b:
Гость
Ответ(ы) на вопрос:
Гость//Pascal ABC.NET v3.1 сборка 1172
//6
Var
r:integer;
begin
readln(r);
writeln('S=',pi*sqr(r));
writeln('L=',pi*2*r);
end.
//7
Var
a,b:integer;
begin
read(a,b);
writeln('S=',pi*a*b);
writeln('L=',pi*(a+b));
end.
Не нашли ответ?
Похожие вопросы