Сделать программу на Иван Царевич попал в сад Кащея, где росли молодильные яблоки и ананасы бессмертия. У Ивана с собой была только одна волшебная сумка. Если сумку заполнять полностью яблоками, то в нее поместиться M кг яблок, а если только ананасами, то в нее поместиться N кг ананасов. Яблоки и ананасы можно загружать в сумку вместе в любой пропорции. Килограмм яблок стоит на базаре A рублей, килограмм ананасов – B рублей. Иван собирается лететь на рынок на ковре-самолете, который может унести не более D кг груза, не считая самого И

1.
const n=12; 
var
  a:array[1..n] of integer;
  i,max,imax,min,imin:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
  a[i]:=Random(51)+150;
  Write(a[i]:4)
end;
writeln;
max:=a[1]; imax:=1;
min:=a[1]; imin:=1;
for i:=2 to n do 
 begin
 if a[i]>max then begin max:=a[i]; imax:=i; end;
 if a[i]<min then begin min:=a[i]; imin:=i; end;
 end; 
Writeln('max = a[',imax,'] = ',max,',  min = a[',imin,'] = ',min);
end.

Пример:
Исходный массив:
 170 165 194 186 165 161 174 172 177 191 158 181
max = a[3] = 194,  min = a[11] = 158

2.
const n=20; 
var
a:array[1..n] of integer;
i,j,c:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do begin
  a[i]:=Random(51)-25;
  Write(a[i],' ')
end;
Writeln;
for i:=1 to n div 2-1 do
  for j:=1 to n div 2-i do
    if a[j]>a[j+1] then
    begin c:=a[j]; a[j]:=a[j+1]; a[j+1]:=c end;
Writeln('Измененный массив:');
for i:=1 to n do Write(a[i],' ');
Writeln
end.

Пример:
Исходный массив:
16 3 1 18 10 -12 -23 19 -5 -5 0 10 13 14 17 14 6 22 25 -22 
Измененный массив:
-23 -12 -5 -5 1 3 10 16 18 19 0 10 13 14 17 14 6 22 25 -22

Изображение на экране монитора формируется из отдельных точек - пикселей, образующих строки; всё изображение состоит из определённого количества таких строк.

Пространственное разрешение монитора - это количество пикселей, из которых складывается изображение на его экране. Оно определяется как произведение количества строк изображения на количество точек в строке.

Разрешение монитора 1280´1024 означает, что изображение на его экране будет состоять из 1024 строк, каждая из которых содержит 1280 пикселей

Изображение высокого разрешения состоит из большого количества мелких точек и имеет хорошую чёткость. Изображение низкого разрешения состоит из меньшего количества более крупных точек и может быть недостаточно чётким

Компьютерное представление цвета

Человеческий глаз воспринимает каждый из многочисленных цветов и оттенков окружающего мира как сумму взятых в различных пропорциях трёх базовых цветов - красного, зелёного и синего. Такая модель цветопередачи называется RGB (red – красный, green –зеленый, bluy – синий).

У первых цветных мониторов базовые цвета имели всего две градации яркости, т. е. каждый из трёх базовых цветов либо участвовал в образовании цвета пикселя (1), либо нет (0).

Палитра таких мониторов состояла из восьми цветов. При этом каждый цвет можно было закодировать цепочкой из трёх нулей и единиц - трёхразрядным двоичным кодом.

Современные компьютеры обладают необычайно богатыми палитрами, количество цветов в которых зависит от того, сколько двоичных разрядов отводится для кодирования цвета пикселя.

Глубина цвета - длина двоичного кода, который используется для кодирования цвета пикселя. Количество N цветов в палитре и глубина i цвета связаны между собой соотношением: N = 2i.

Видеосистема персонального компьютера

Качество изображения на экране компьютера зависит как от пространственного разрешения монитора, так и от характеристик видеокарты (видеоадаптера), состоящей из видеопамяти и видеопроцессора.