Сколько памяти нужно для хранения 32-цветного растрового графического изображения размером 64x256 точек? ответ дайте в кбайт.

2^i=32
i=5
N=64*256=16384
V=N*i=16384*5=81920 бит=10240 байт=10 Кбайт

num = int(input('Кол-во человек: '))

number = int(input('Какое число в считалке? '))

print('Значит, выбывает каждый', number, 'человек.')

mens_list = list(range(1, num + 1))

out = 0

for _ in range(num - 1):

   print('Текущий круг людей', mens_list)

   start_count = out % len(mens_list)

   out = (start_count + number - 1) % len(mens_list)

   print('Начало счёта с номера', mens_list[start_count])

   print('Выбывает человек под номером', mens_list[out])

   mens_list.remove(mens_list[out])

   print()

print('Остался человек под номером', mens_list)

// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
  var a:=ArrRandom(10,50,100); a.Println(', ');
  var s:=0;
  for var i:=0 to 9 do s+=a[i];
  Writeln('s=',s)
end.

Тестовое решение:
64, 59, 67, 54, 90, 51, 94, 70, 65, 82
s=696

"Школьный" вариант:

// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
var
  a:array[1..10] of integer;
  i,s:integer;
begin
  Randomize;
  s:=0;
  for i:=1 to 10 do begin
    a[i]:=Random(51)+50;
    Write(a[i],' ');
    s:=s+a[i]
    end;
  Writeln;
  Writeln('s=',s)
end.

Тестовое решение:
82 88 94 65 73 94 86 56 91 60
s=789

И, чтобы не быть голословным, современный вариант:

// PascalABC.NET 3.0, сборка 1150 от 22.01.2016
begin
  Writeln('s=',ArrRandom(10,50,100).Println.Sum)
end.

Тестовое решение:
94 90 70 85 62 58 94 73 67 97
s=790