Укажите название, тип данных, а также строку программного кода, обеспечивающую проверку корректности отображения переменной, описывающей выходные данные.i) наименование: ………………………………………………………………..ii) тип данных: ………………………………………………………………..iii) программный код для проверки корректности отображения: ……………………………………………………………………………………………….. ………………………………………………………………………………………………..
кол-во точек = 11 Кбайт/7 бит = 11*1024*8 бит/7 бит=12873,1428571
Если считать, что информации не 11 Кбайт, а 14 (что скорее всего),
то 14*1024*8/7=16384
2. 42 Кбайт/(64*128 пикселов)=42*1024 байт/8192=5,25 байт=42 бит
кол-во цветов = 2^42=что-то очень много, скорее всего - опять опечатка
если вместо 42 взять 12, то 12 Кбайт/(64*128 пикселов)=12*1024 байт/8192=1,5 байт=12 бит
кол-во цветов = 2^12=4096
3. 64*64*log(2)32/(1024*8)=2.5 Кбайт
4. log(2)512/log(2)32=9/5=1,8
5. количество цветов должно быть 16 777 216
log(2)16777216=24 (бит на один пиксель), в байтах 24/8=3
var A:array [1..n] of real; {объявление массива А} i:byte; {переменная для циклов} b:boolean; {идентификатор роста}begin writeln('vvedite tselie chisla matrici A[',n,',',n,']'); for i:=1 to n do begin {циклвводавмассив} write('A[',i,'] = '); readln(A[i]); end; writeln; writeln('matraca imeet vid: '); for i:=1 to n do begin {циклвыводамассива} write(A[i]:3:3,' '); end; writeln; b := true; for i:=1 to n-1 do {цикл определения роста} if (A[i] > A[i+1]) then begin {если текущий больше следующего} b := false; {значит масив невозростающий} break; end; if (b) then writeln('Masiv A - vozrostaushaya posledovatelnost''') else writeln('Masiv A - ne vozrostaushaya posledovatelnost'''); readln;