решить информатика 8 класс

//Pascal
var
  A: array[1..10] of integer;
  i, Count: byte;
  sum: integer;
begin
  randomize;
  writeln('Сгенерированный массив');
  for i := 1 to 10 do
  begin
    A[i] := random(8)-3;
    if A[i] < 0 then
      sum := sum + A[i];
    write(A[i],' ');
  end;
  writeln;
  writeln('Сумма отрицательных элементов = ', sum);
  writeln;
  writeln('Измененный массив');
  for i := 1 to 10 do
  begin
    if A[i] >= 0 then
    begin
      A[i] := 0;
      Count := Count + 1;
     end;
    write(A[i], ' ');
  end;
  writeln;
  writeln('Количество нулевых элементов = ', Count);
end.

Решение: Разрешающая сканера 300 dpi (dot per inch - точек на дюйм) означает, что на отрезке длиной 1 дюйм сканер различить 300точек.

Переведем разрешающую сканера из точек на дюйм (1 дюйм = 2,54 см) в точки на сантиметр:

300dpi : 2,54 ≈ 762 точек/см.

Следовательно, размер изображения в точках составит

76200х76200 точек.

Общее количество точек изображения равно:

76200 · 76200 = 5 806 440 000.

Информационный объем файла равен:

32 бита · 5 806 440 000 = 1 185 806 080 000 бит ≈  22 681 406 Кб ≈ 22 150Мб ≈ 21 Гб