
Никандр
5 год назад
составить программу вычисления площади прямоугольника если известно его одну сторону и длину окружности описанной около него Pascal
ОТВЕТЫ

Walker Williamя
Oct 24, 2020
var a,c,d,b,s:real;
begin
readln(a,c);
d:=c/pi;
b:=sqrt(d*d-a*a);
s:=a*b;
writeln('s = ',s:5:1);
end.
Пример:
3.0 15.7
s =12.0
begin
readln(a,c);
d:=c/pi;
b:=sqrt(d*d-a*a);
s:=a*b;
writeln('s = ',s:5:1);
end.
Пример:
3.0 15.7
s =12.0
423
Смежные вопросы: