Ответ: program adidos;var X2,Y2,R:real;beginwriteln(‘Введите X2 и Y2’);readln(X2);readln(Y2);R:=(X2+Y2)/2;writeln(‘R=’,R);end.