Информатика! только нужно полное и понятное решение! 1)сканируется цветное изображение размером 10 х 10 см. разрешающая сканера — 600 х 1200 dpi, глубина цвета — 2 байта. какой информационный объём будет иметь полученный графический файл? 2)сканируется цветное изображение размером 10 х 15 см. разрешающая сканера — 600 х 600 dpi, глубина цвета — 3 байта. какой информационный объём будет иметь полученный графический файл? за лучший ответ 35

👇

Ответ:

DoIIIuPak18

26.04.2022

1. Размеры изображения даны в сантиметрах, а разрешающая сканера - в дюймах. Нужно перейти к каким-то одним единицам измерения, учитывая соотношение: 1 дюйм ≈ 2.54 см. Допустим, расчеты ведем в сантиметрах. По одной стороне изображения сканер распознает на длине в 1 дюйм (т.е. 2.54 см) 600 точек, по другой - 1200 точек. Тогда на 1 см длины придется 600/2.54 точек и 1200/254 точек соответственно. А на длине в 10 см - в 10 раз больше. Общее количество точек составит
$\displaystyle \frac{600\times10}{2.54}\times \frac{1200\times10}{2.54}= \frac{72\cdot10^6}{2.54^2}\approx 11.16\cdot10^6$
При глубине цвета два байта полученный графический файл будет иметь объем $11.16\cdot10^6\times2=22.32\cdot10^6$ байт.
Можно перевести в мегабайты:
$\displaystyle \frac{22.32\cdot10^6}{1024\times1024}\approx 21.3$ Мбайт

2. Расчет аналогичный, поэтому можно писать кратко.
$\displaystyle \frac{600\times15}{2.54}\times \frac{600\times10}{2.54}= \frac{54\cdot10^6}{2.54^2}\approx 8.37\cdot10^6 \\ 8.37\cdot10^6\times3=25.11\cdot10^6 \\ \displaystyle \frac{25.11\cdot10^6}{1024\times1024}\approx 23.95 Mb$

4,7(52 оценок)

Открыть все ответы

Ответ:

dashenkanosova5

26.04.2022

Задание 3 (двухмерный массив)

var

a:array [1..10,1..7] of integer;

k,i,j:integer;

begin

randomize;

for i:=1 to 10 do begin

for j:=1 to 7 do begin

a[i,j]:=random(9)+1;

write (a[i,j]:4);

if a[i,j] mod 2 <> 0 then k:=k+1;

end;

writeln;

end;

writeln ('Количество нечетных элементов массива = ',k);

readln;

end.

Задание 2 (двухмерный массив)

uses crt;
const
a:array [1..5,1..5] of integer = ((100,101,102,103,104),
(200,201,202,203,204),
(300,301,302,303,304),
(400,401,402,403,403),
(500,501,502,503,504));
var
i,j:integer;
begin
clrscr;
for i:=1 to 5 do begin
for j:=1 to 5 do
if j mod 2 = 0 then begin
textcolor (12);
write (a[i,j]:4);
textcolor (7);
end else begin
textcolor (9);
write (a[i,j]:4);
textcolor (7);
end;
writeln;
end;
readln;
end.

Задание 1 (одномерный массив)

uses crt;
var
a:array [1..7] of integer;
i,sum:integer;
begin
clrscr;
for i:=1 to 7 do begin
write ('A[',i,'] = ');readln(a[i]);
if a[i]>0 then sum:=sum+a[i];
end;
for i:=1 to 7 do
if a[i]>0 then begin
textcolor (red);
write (a[i]:4);
end else begin
textcolor (blue);
write (a[i]:4);
end;
writeln;
textcolor (darkgray);
writeln ('Сумма положительных элементов = ',sum);
readln;
end.

Задание 4 (одномерный массив)

uses crt;
var
a:array [1..12] of integer;
i,buf,min,max:integer;
begin
clrscr;
randomize;
a[1]:=random(14)+1;
min:=1;
max:=2;
writeln ('Исходный массив: ');
write (a[1]:4);
for i:=2 to 12 do begin
a[i]:=random(14)+1;
write (a[i]:4);
if a[i]>a[max] then max:=i else
if a[i]<a[min] then min:=i;
end;
writeln;
{смена 1-ого и последнего эл}
buf:=a[1];
a[1]:=a[12];
a[12]:=buf;
{смена 2-ого и мин эл}
buf:=a[2];
a[2]:=a[min];
a[min]:=buf;
{смена 1-ого и макс эл}
buf:=a[1];
a[1]:=a[max];
a[max]:=buf;
writeln ('Результирующий массив:: ');
for i:=1 to 12 do write (a[i]:4);
writeln;
readln;
end.

Задание 3 (одномерный массив)

var
a,b:array [1..10] of integer;
i,j:integer;
s1,s2:real;
begin
randomize;
s1:=0;
s2:=0;
writeln;
for i:=1 to 10 do begin
a[i]:=random(11)-5;
b[i]:=random(19)-9;
write (a[i]:4);
s1:=s1+a[i];
s2:=s2+b[i];
end;
writeln;
for i:=1 to 10 do write (b[i]:4);
writeln;
s1:=s1/10;
s2:=s2/10;
if s1>s2 then writeln ('S1 > S2') else
if s1<s2 then write ('S1 < S2') else writeln ('S1 = S2');
readln;
end.