Сравнить два числа без условий и стандартными операциями - Turbo Pascal
Формулировка задачи:
Необходимо сравнить два натуральных числа , используя только +-*/ div mod .
Разветвления использовать нельзя
Голова сломана )
Решение задачи: «Сравнить два числа без условий и стандартными операциями»
textual
Листинг программы
var a,b,a1,b1:word;
begin
writeln('введите 2 числа');
readln(a,b);
a1:=a div b;
a1:=((a1+2) div (a1+1)) mod 2;
b1:=(a1+1) mod 2;
writeln('число ', a*a1+b*b1,' больше или равно ',a*b1+b*a1);
readln;
end.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д