768 строк, это же очевидно...
И не расширение, а разрешение
Я не сильна в информатике,но посчитала так: 64*32=2048 символов в данной статье;2048*2=4096 байт в кодировке;и 1 Мб=1024 Кб,по-этому 4096:1024=4 Кб
Ответ:4 Кб.
Var
a:array [1..10] of integer;
i,k,s:integer;
begin
randomize;
writeln('Массив:');
for i:=1 to 10 do
begin
a[i]:=random(191)+10;
write(a[i],' ');
end;
writeln;
for i:=1 to 10 do
begin
if (a[i]<100)and(((a[i] div 10)mod 2)=0) then s:=s+a[i] else
if (((a[i] div 10)mod 10) mod 2) = 0 then s:=s+a[i];
end;
writeln('Сумма элементов у которых вторая с конца цифра четная:',s);
end.