Задача по паскалю. У ведіть два числа.Менше замініть сумою цих ...
Задача по паскалю.
У ведіть два числа.Менше замініть сумою цих чисел, більше - їх різницею. Видіть результати.
Есть ответ
17.12.2022
329
Ответ
var a,b,x,y: integer;
begin
writeln('vvedite 2 chisla');
readln(a,b);
if a-b>0 then
begin
x:=a-b;
y:=a+b;
end
else
begin
x:=a+b;
y:=b-a;
end;
write('a = ',x,', b = ',y);
readln;
end.
Если вы нашли правильное решение, вы можете поблагодарить нас начиная с 10 рублей.
Просто нажмите на кнопку "Подарить".
Просто нажмите на кнопку "Подарить".
17.12.2022
