1) площадь изображения 35.56×35.56 = 1264.51 квадратных дюймов. количество точек в квадратном дюйме 1200×1200 = 1 440 000 точек количество точек во всем изображении 1 440 000 * 1264.51 = 182 089 440 000 глубина цвета 16 бит. 3 цвета RGB * 16 = 48бит на точку Итого 182089440000 * 48 = 8740293120000 бит 8740293120000 / 8 бит в байте / 1024 байт в КБ /1024 кб в мб / 1024 мб в гб = 865,39 Гигабайт
2) для палитры в 4 цвета небоходимо 2^n=4, n=2бита 55*55 = 3025 пикселя * 2 бита на пиксель = 6050бит
3) изображение 12,7×12,7 см. Разрешающая сканера — 600×1200 dpi, глубина цвета — 32 бита. в 1дюйме 2,54 см, 12,7см/2,54 см = 5 дюйм Изображение 5 * 5 = 25 квадратных дюймов 600*1200 = 720 000 точек на квадратный дюйм 720 000 * 25 = 18 000 000 точек на изображение
глубина цвета 32 бит. 3 цвета RGB * 32 = 96 бит на точку Итого 18 000 000 * 96 = 1 728 000 000 бит / 8 бит в байте = 216 000 000 байт
PROGRAM MatrixMax var a : array [1..3, 1..4] of integer b : array [1..3] of integer Max, i, j : integer BEGIN crt; for i:=1 to 3 do begin for j:=1 to 4 do begin read (a[i, j]); // вводим элементы в массив a[1..3, 1..4] end; writeln; // делаем пустой перевод строки end; for i:=1 to 3 do begin b[i] := a[i, 1]; for j:=1 to 4 do begin if a[i, j] > b[i] then b[i] := a[i, j]; // находим максимальный элемент в каждой строке и записываем в b[1..3] end; end; Max := b[1]; for i:=1 to 3 do if b[i] > Max then Max := b[i]; // Находим максимальный элемент из максимальных элементов writeln (Max); // Выводим его на экран END.
var
B: array [1..10] of string :=('а','р','ц','ь','т','в','ц','п','б','с');
total: integer;
begin
for var i:= 1 to 10 do
begin
if B[i]='п' then total:=total+i;
if B[i]='р' then total:=total+i;
if B[i]='с' then total:=total+i;
if B[i]='т' then total:=total+i;
end;
writeln(total);
end.
Объяснение: