1А)Какое минимальное количество бит потребуется для кодирования любого цвета из палитры, насчитывающей 700 различных цветов? 1) 8 2) 10 3) 12 2А)В тетради записано число 213. Сначала его необходимо умножить на два, а затем, если получится число больше 1000, отбросить последнюю цифру. Какое число будет записано в тетради после 5 таких операций? 1) 340 2) 816 3) 680 3А)Как называется стандарт передачи данных в локальных сетях? (ответ впишите в поле с заглавной буквы!) 4А)Для кодирования цвета фона web-страницы используется атрибут bgcolor=”#”, где в кавычках задаются шестнадцатеричные значения интенсивности цветовых компонент в 24-битной RGB-модели. Какой цвет фона будет у страницы, заданной тегом ? 1) Фиолетовый 2) Оранжевый 3) Зеленый 5А)Для передачи по каналу связи сообщения, состоящего только из символов К, Л, М, Н, используется неравномерный (по длине) код: К – 110, Л – 100, М – 01, Н – 10. Через канал связи передается сообщение: НЛМММНК. Закодируйте сообщение данным кодом. Полученную двоичную последовательность переведите в шестнадцатеричный вид. 1) 71E2D 2) A2B6 3) ACDC 6А) О чем идет речь? Это конечный набор правил, который определяет последовательность операций для решения конкретного множества задач и обладает пятью важными чертами: конечность, определённость, ввод, вывод, эффективность (ответ впишите в поле с заглавной буквы!) 7А) Чему равна сумма чисел 1111002 и 1018 ? 1) 1112018 2) 11111012 3)10000012 8А) Какое из чисел С, записанных двоичной системе счисления, отвечает условию А < C < B? При А=1278, В=6916. (ответ в двоичной системе счисления впишите в поле!)
Ответы
Program a4;
var
x, kl, k2: integer;
begin
kl := 0;
k2 := 0;
x:=1;
while x<>0 do
begin
writeln ('Введите целое число');
readln (x);
if x<0 then kl := kl + 1;
if x<0 then k2 := k2 + 1
end;
writeln ('kl=', kl, ' ', 'k2=', k2)
end.
Программа была написана с синтаксическими ошибками: a4 и х были записаны русскими буквами, а вместо нулей 0 использовалась буква О.
Кроме того, конструкции if x<0 then kl := kl + 1; и if x<0 then k2 := k2 + 1 делают одно и то же, только с разными переменными. Скорее всего, одно из условий должно содержать знак не меньше, а больше, либо больше или равно.
var
x, kl, k2: integer;
begin
kl := 0;
k2 := 0;
x:=1;
while x<>0 do
begin
writeln ('Введите целое число');
readln (x);
if x<0 then kl := kl + 1;
if x<0 then k2 := k2 + 1
end;
writeln ('kl=', kl, ' ', 'k2=', k2)
end.
Программа была написана с синтаксическими ошибками: a4 и х были записаны русскими буквами, а вместо нулей 0 использовалась буква О.
Кроме того, конструкции if x<0 then kl := kl + 1; и if x<0 then k2 := k2 + 1 делают одно и то же, только с разными переменными. Скорее всего, одно из условий должно содержать знак не меньше, а больше, либо больше или равно.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Перевод из десятичной в двоичную систему 50 в двоичную и десятичную.
Автор: vorobyeva6428
Информатика, нужно разьяснение.
Автор: alfaantonk
Нарисовать автомобиль в pascal abc
Автор: MArat
Величина , значения которой указывается в тексте алгоритма и не меняется в процессе его исполнения .
Автор: Исаченко Тераски1181
Будем наращивать длину последовательности от 0 знаков до N. Пусть после какого-то количества шагов у нас выписаны все последовательности длины А и мы хотим узнать количество подходящих последовательностей длины А+1. Распределим все последовательности на три группы(так как предыдущие символы нас не волнуют, то любые последовательности одной группы для нас равнозначны):
1) Заканчиваются на 0.
2) Ровно на одну единицу
3) Ровно на две единицы.
Из каждой последовательности группы 1 приписыванием нуля или единицы мы можем получить одну последовательность группы 1 и одну - группы 2. Неважно, какие именно, но они не перекрываются, т.к. предыдущие символы различны, хоть мы их и не учитываем. Точно так же из второй группы мы получаем одну последовательность группы 3 и одну группы 1, а из группы 3 - только группу 1. Таким образом, если количества последовательностей длины А по группам были (x, y, z), то для длины А+1 такое распределение будет (x+y+z, x, y). Если взять для длины 0 тройку (0, 0, 1) и просчитать тройки от 1 до N, получится искомое количество. Для N=1 и N=2 также работает правильно.
Программа на Pascal:
var num00,num01,num11,mem00:integer;
n,i:byte;
begin
readln(n);
num00:=1;
for i:=1 to n do begin
mem00:=num11;
num11:=num01;
num01:=num00;
num00:=num01+num11+mem00;
end;
writeln(num11+num01+num00);
end.