М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Linazhurenkova
Linazhurenkova
13.02.2023 21:38 •  Информатика

1)в кокой строке единицы измерения информации расположены по убываниюа) гигабайт мегабайт килобайт байт битб)бит байт мегабайт килобайт гигабайтв)байт бит килобайт мегабайт гигабайт г) бит байт килобайт мегабайт гигабайт2)для кодирования одного из цветов палитры служит двоичный код 001.сколько цветов содержит палитра? а) 3 б) 8 в) 16 г) 243)статья,набранная на компьютере,содержит 16 страниц,в каждой строке 40 символов. в одном из представлений unicode каждый символ кодируеться 16 битами. определите информационный объем статьи в этом варианте представлеия unikode. c решением а)50кбайт в)400байтб)40кбайт г)800байт4)в каком из ниже предложений правильно расставлены пробелы между словами и знаками препинаниями? а) с родной земли- умри , не сходи.б) с родной земли -умри, не сходи .г) с родной земли-умри, не сходи.д) с родной земли - умри, не сходи.5)определите какое из указанных ниже имен файлов удовлетворяет маске: ? se*lo.d? а) selo.d в) hseolo.dppб) selo.dpp г) hseolo.d6)в некотором каталоге хранился файл вьюга.doc, имевший полное имяd: \2013\зима\вьюга.doc. в этом каталоге создали подкаталог январь и файл вьюга.doc переместили в созданный подкаталог. укажите полное имяэтого файла после перемещения. если сдесь есть решение то напишите его а) d: \январь\вьюга.docб) d: \2013\зима\вьюга.docв) d: \2013\январь\вьюга.docг) d: \2013\зима\январь\вьюга.doc7). считая, что каждый символ кодируется одним байтом, определите, чему равен информационный объём следующего высказывания: где родился, там и сгодился ( с решением )8)валя шиф­ру­ет рус­ские слова (последовательности букв), за­пи­сы­вая вме­сто каж­дой буквы её код: а д к н о с01 100 101 10 111 000некоторые це­поч­ки можно рас­шиф­ро­вать не одним например, 00010101 может озна­чать не толь­ко ска, но и снк. даны три ко­до­вые цепочки: 1001010001000001010110001найдите среди них ту, ко­то­рая имеет толь­ко одну расшифровку, и за­пи­ши­те в от­ве­те рас­шиф­ро­ван­ное слово.9)в таб­ли­це за­про­сы к по­ис­ко­во­му серверу. для каж­до­го запроса ука­зан его код — со­от­вет­ству­ю­щая буква от а до г. рас­по­ло­жи­те коды за­про­сов слева на­пра­во в по­ряд­ке возрастания ко­ли­че­ства страниц, ко­то­рые нашёл по­ис­ко­вый сервер по каж­до­му запросу. по всем за­про­сам было най­де­но разное ко­ли­че­ство страниц. для обо­зна­че­ния логической опе­ра­ции «или» в за­про­се используется сим­вол «|», а для ло­ги­че­ской операции «и» — «& »: код запроса рим& париж& лондонб лондон | римв рим& лондонг рим | париж | лондон 10) несжатое растровое изображение размером 64*512 пикселей занимает 16 кб памяти. каково максимально возможное число цветов в палитре изображения варианты я все которые у меня есть решите все

👇
Открыть все ответы
Ответ:
Радость2129
Радость2129
13.02.2023
Procedure Four(n:integer; var a:a_type); 
{Процедура построения квадрата при n двойной четности: n=4,8,12,16...} 
PascalВыделить код1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 Var i,j,k:integer; p,l:integer; i1,j1,x,y:integer; Begin l:=1; p:=n*n; for i:=1 to n do for j:=1 to n do begin a[i,j]:=l; inc(l) {l:=l+1} end; i:=2; while i<=n-2 do begin if i mod 4=0 then j:=4 else j:=2; while j<=n-2 do begin for i1:=0 to 1 do for j1:=0 to 1 do begin y:=i+i1; x:=j+j1; a[y,x]:=p-a[y,x]+1; end; j:=j+4; end; i:=i+2 end; k:=4; while k<=n-4 do begin a[1,k]:=p-a[1,k]+1; a[1,k+1]:=p-a[1,k+1]+1; a[n,k]:=p-a[n,k]+1; a[n,k+1]:=p-a[n,k+1]+1; a[k,1]:=p-a[k,1]+1; a[k+1,1]:=p-a[k+1,1]+1; a[k,n]:=p-a[k,n]+1; a[k+1,n]:=p-a[k+1,n]+1; k:=k+4 end; a[1,1]:=p-a[1,1]+1; a[n,n]:=p-a[n,n]+1; a[1,n]:=p-a[1,n]+1; a[n,1]:=p-a[n,1]+1; end;
4,4(73 оценок)
Ответ:
metin2005
metin2005
13.02.2023
Var
  d: integer;
  i, k, n: longint;
  flag: boolean;

begin
  Write('Введите верхнюю границу для счета: '); Readln(k);
  for i := 1 to k do
  begin
    n := i;
    repeat
      d := n mod 10;
      if d > 0 then flag := ((i mod d) <> 0) else flag := true;
      if (not flag) then n := (n div 10)
    until (flag or (n = 0));
    if n = 0 then Write(i, ' ')
  end;
  Writeln
end.

Тестовое решение:
Введите верхнюю границу для счета: 1237
1 2 3 4 5 6 7 8 9 11 12 15 22 24 33 36 44 48 55 66 77 88 99 111 112 115 122 124 126 128 132 135 144 155 162 168 175 184 212 216 222 224 244 248 264 288 312 315 324 333 336 366 384 396 412 424 432 444 448 488 515 555 612 624 636 648 666 672 728 735 777 784 816 824 848 864 888 936 999 1111 1112 1113 1115 1116 1122 1124 1128 1131 1144 1155 1164 1176 1184 1197 1212 1222 1224 1236
4,5(32 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ