Question

Помогите пожалуйста​

Answer 1

Ответ:

var r1,r2,d:real;

begin

 writeln('Введите R1');

 readln(r1);

 writeln('Введите R2');

 readln(r2);

 writeln('Введите расстояние между центрами D');

 readln(d);

if r1+r2<d then writeln('Не пересекаются');

if r1+r2=d then writeln('Касаются');

if r1+r2>d then writeln('Пересекаются');

end.