СОСТАВИТЬ ТАБЛИЦУ РЕЗУЛЬТАТОВ ПО БЛОК СХЕМЕ

Program Djonny1981;
uses crt;
const
  m=5;
var
  a: array[1..m,1..m] of integer;
  i, j: integer;
  sum: integer;
begin
  randomize;
  sum:=0;
  for i:=1 to m do
    begin
      for j:=1 to m do
        begin
          a[i,j]:=random(101)-50;
          write(a[i,j]:5);
        end;
        writeln();
    end;
  for i:=1 to m do
    for j:=1 to m do
      if j mod 2 = 0 then {вот здесь проверка, чётный ли столбец}
         sum := sum + a[i,j];
  writeln('Сумма элементов чётных столбцов равна ',sum);
  if sum>0 then
      for i:=1 to m do
        for j:=1 to m do
          if i mod 2 = 1 then
            a[i,j]:=a[i,j]*a[i,j]
    else
      for i:=1 to m do
        a[m-i+1,i]:=a[m-i+1,i]+2;
  for i:=1 to m do
    begin
      for j:=1 to m do
        write(a[i,j]:5);
      writeln();
    end;
end.

Так происходит потому, что данные на SSD и HDD накопителях компьютера измеряются в двоичной системе исчисления, в виде единиц и нулей, а не в десятеричной, как мы привыкли. Вся разница возникает, когда производитель дисков для удобства указывает размер в десятеричной системе.

Из-за того, что в 1 Кб (Килобайт) = 1024 байт и возникает такая путаница.

Пойдем дальше, и посчитаем значения для более высоких значений:

1 Мб (Мегабайт) = 1024 Кб

1 Гб (Гигабайт) = 1024 Мб

1 Тб (Терабайт) = 1024 Гб

Для начала Гигабайты переведем в байты. Для этого потребуется три раза умножить на 1024. А дальше разделить на 1000 три раза. Итого: 16Гб*1024*1024*1024*1000*1000*1000=14,9 Гб.

Именно столько будет видеть Ваш компьютер.

Объяснение: