1) I1 = 1024 * 768 * 32 = 25165824 бит = 3145728 байт = 3072 КБайт = 3 МБайт - объем графического файла без сжатия
2) I2 = 3 * 0.8 = 2.4 МБайт - объем графического файла с коэффициентом сжатия 0.2
Var i:integer;
begin
for i:=1000 to 9999 do
if i mod 134 = 11 then writeln(i);
end.
Результат (только начало и конец, т.к. чисел много):
<span>1083
1217
1351
...
</span><span>9659
9793
9927</span>
A) writeln(c);
б) var a, s: integer;
в) r := p - q;
2. а)
9
53 (после writeln происходит переход на новую строку, после write - нет)
2. б)
8
5-35+1=6
Program n2;
const n=10;
var a: array [1..n] of integer;
i,k,j,temp: integer;
begin
randomize;
writeln('исходный массив');
k:=0;
for i:=1 to n do
begin
a[i]:=random(201)-100;
write(a[i],' ');
end;
writeln;
writeln('полученный массив: ');
for i:=1 to n do
for j:=i to n do
if a[j]>a[i] then
begin
temp:=a[i];
a[i]:=a[j];
a[j]:=temp
end;
for i:=1 to n do begin
write(a[i],' ');
if (a[i]<0) and (i mod 2=0) then k:=k+1;
end;
writeln;
write('кол-во отрицательных элементов на четных местах: ',k);
end.
Шесть
Если представить эти тропинки в виде проекции, то по сути мы имеем просто 3 отрезка, которые встречаются в одной точке (для проверки можете так 3 карандаша положить на стол концами друг к другу). Нам надо к каждому из трех "входов" подобрать по два "выхода" (при условии, что мы не можем вернуться назад).
То-есть мы должны 3*2 =6 раз спуститься, проложив 6 маршрутов.