Даны 2 числа x и y Меньшее из этих чисел, замените их полученной суммой

Даны 2 числа x и y Меньшее из этих чисел, замените их полученной суммой
Гость
Ответ(ы) на вопрос:
Гость
var x,y:integer;  begin  writeln('Введите X');  read(x);  writeln('Введите Y');  read(y);    if x>y then writeln('X=',x,',','Y=',X+Y)    else writeln('X=', X+Y,',','Y=', Y);    end.   
Не нашли ответ?
Ответить на вопрос
Похожие вопросы