Записать на языке паскаля. "Даны два числа. Замените меньшее из них модулем разности этих чисел, а большее модулем суммы." СРОЧНО
Записать на языке паскаля. "Даны два числа. Замените меньшее из них модулем разности этих чисел, а большее модулем суммы." СРОЧНО
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var a,b,c:integer;
begin
writeln('Vvedi a,b')
readln(a,b);
c:=a+b;
if (a>b) then
begin
b:=abs(a-b);
a:=c;
end
else if (a