Перевндите число 111 из десятичной системы счисления в двоичную

Question

Информатика: Перевндите число 111 из десятичной системы счисления в двоичную

freedomman87 · Accepted Answer

1)var a:array[1..4,1..4] of integer;       i,j,s:integer; begin       for i:=1 to 4 do          for j:=1 to 4 do                 readln(a[i,j]);                      for i:=1 to 4 do begin                       writeln();                    for j:=1 to 4 do begin                       write(a[i,j],   );                      if (i+j 5) then s:=s+a[i,j];                         end;                  end; writeln(); write(s); end. 2)var a:array[1..4,1..4] of integer;       i,j,s:integer; begin    ...

MOGZ ответил