Как отключить ТРОТТЛИНГ?​

2 = 2^1

8 = 2^3

это значит, что в двоичной системе определяющим является 1 цифра, а в 8-ричной - 3 цифры; разбиваем 2-ичную сис на группы по три числа, и переводим их в другую систему. например в первом будут группы чисел 100, 010,   010, 110; (разбивается с конца, исключаем возможность ошибки) 100 это 4 и т д..

var m,n: integer;

begin

  read(n,m);

  if n > m then writeln(m+n, n);

  else writeln(m+n, m);

end.

во второй непонятно как задются эти числа

var i,n: integer;

begin

  read(n);

  for i : = 1 to n do

      writeln(i, i*i);

end.

блок схемы мы не учили да и фигня эти схемы чесно говоря

var a,b,c: real;

begin

  read(a,b,c);

  if (a> b) and (b> c) then begin

      a: =a*2;

      b: =b*2;

      c: =c*2;

  end

  else begin

      a: =-a;

      b: =-b;

      c: =-c;

  end;

  writeln(a,b,c);

end.

var x,y: integer;

begin

readln(x);

if x< 1 then y: =-2*x+11

else y: =x*x-2;

writeln(y);

end.