Информатика, опубликовано 2018-08-22 20:38:15 by Гость

Даны длины радиусов двух окружностей.Составьте программу определяющую разность площадей этих окружностей

Ответ оставил Гость

Var r1,r2,ds:real;
begin
write(R1 = ); readln(r1);
write(R2 = ); readln(r2);
ds:=pi*abs(r1*r1-r2*r2);
writeln(ds = ,ds);
end.

Пример:
R1 = 6
R2 = 4
ds = 62.8318530717959

Не нашли ответа?

Если вы не нашли ответа на свой вопрос, или сомневаетесь в его правильности, то можете воспользоваться формой ниже и уточнить решение. Или воспользуйтесь формой поиска и найдите похожие ответы по предмету Информатика.