1. Линейный Integer;
2. Два блока с циклами;
3. Размер массива от 0 до 10 (11 элементов);
4. Обрабатываются все 11.
Var N,S: integer;
begin
N:=0;
S:=0;
while s<=47 do
begin
N:=n+1;
S:=s+2;
end;
write(N);
end.
Ответ: 24
если по логике то должно получится 2064, а это 2 килобайта 16 байт = 2,16 килобайт.
Ответ под номерам Б, я так считаю