Дано целое число, не равное нулю. Вывести на экран его абсолютную величину (условно принимая, что соответствующей стандартной функции нет). Полный условный оператор не использовать. В программе запрещено использовать слова: abs, else
Не самый рациональный метод решения, но как говорится чем смог тем
var a,b,c,x,kc,kn,k1,k2:integer; begin kc:=1; kn:=1; k1:=0; k2:=0; a:=0; b:=0; writeln('Введите число x'); read(x); while x>0 do begin c:=x mod 10; if c mod 2=0 then begin inc(k1); a:=a+c*kc; kc:=kc*10; end; if c mod 2<>0 then begin inc(k2); b:=b+c*kn; kn:=kn*10; end; x:=x div 10; end; if k1>k2 then writeln('Четных больше нечетных') else if k1=k2 then writeln('Количество четных = количеству нечетных') else writeln('Четных меньше нечетных'); writeln(a,' ', b); end.
Если Света и Настя идут в лес, то и Маша идет в лес. Иначе - если они идут на рыбалку - то и Маша тоже. Если они идут на рыбалку, то Гриша тоже. Иначе - если они идут в лес - то и Гриша идет в лес. А Алексей вместе с Гришей. Получается, что Маша, Гриша и Алексей идут туда, куда идут Света и Настя. Света, похоже, везде ходит вместе с Настей. А Настя идет вслед за Мишей. Получается, что они все идут вслед за Мишей. Верное утверждение 2: Если Света идет в лес, то все берут корзины и ножики и тоже идут в лес за грибами.
n = int(input())
if n < 0:
n = 0 - n
print(n)