<span>Ответ:В режиме истинного цвета: 6000,
При кодировании с палитрой 256 цветов- 2000,
При кодировании с палитрой 16 цветов- 1000,
В черно-белом варианте 250</span>
Эта программа подсчитывает сумму первой половины элементов массива. Т.е. сумма считается для тех элементов, индекс которых (i) меньше n-i.
В данном случае n=10, => максимальное i для которого будет выполнен подсчет = 5 (5<=10-5)
Т.к. индексация начинается с нуля, - берем сумму 6-ти первых чисел:
0+1+2+3+4+5=15
Ответ: 3) 15
Const
maxn = 4;
maxm = 5;
type
myarr = array [1..maxn, 1..maxm] of longint;
var
a: myarr;
sum, i, j: longint;
begin
for i := 1 to 4 do begin
for j := 1 to 5 do begin
a[i, j] := i * j;
write(a[i, j], ' ');
end;
writeln;
end;
sum := 0;
for j := 1 to 5 do begin
for i := 1 to 4 do
if (a[i, j] mod 3 = 0) then
sum := sum + a[i, j];
writeln('Сумма чисел, кратных 3, в ', j, ' столбце равна ', sum);
sum := 0;
end;
end.
Дано: I = 1,5 Кб, К = 3072 символа. Найти: N — ? Решение. I= 1,5 Кб = 1,5 • 1024 • 8 = 12 288 бит. I I = I/K = 12288/3072 = 4 бита N=2i = 24 =16 символов
var
i: integer;
begin
for i:= 35 to 87 do
begin
if i mod 7 = 1 then writeln(i, ' - остаток 1');
if i mod 7 = 2 then writeln(i, ' - остаток 2');
if i mod 7 = 5 then writeln(i, ' - остаток 5');
end;
end.