Сначала переведем В в восьмеричную систему.
2034 (5) = 415 (8)
415 (8) + 327 (8) = 744 (8)
Переведу результат в двоичную систему.
744 (8) = 111100100 (2).
Var
mas:array [1..20] of integer;
i,sum,A:integer;
begin
for i:=1 to 20 do
read(mas[i]);
for i:=1 to 20 do
If odd(mas[i]) then
sum:=sum+mas[i];
writeln('Сумма элементов имеющих нечетное значение = ',sum);
writeln('Введите А');
readln(A);
writeln('Индексы элементов, значение которых больше,чем А:');
for i:=1 to 20 do begin
if mas[i]>A then
write(i,' ');
end;
end.
I (размер файла) = K (количество пискелей) * i (объем одного пикселяя)
Например если разрешение 1280x720, то K=1280*720
N - Количество цветов, через него можно найти i. N=2^i
Например если черно-белое изображение, т. е. 2 цвета, то N=2^i=2 ⇒ i=1
Если 256 цветов, то N=2^i=256 ⇒ i=8
Решение:
1)20*60*5=6000(символов)
Объясняю
1 символ весит 8 бит
8 бит=1 байту
Ммм, если ты нигде не ошибся, то цикл не выполнится и программа выведет только девятку, которая перед этим самым циклом стоит