Дан массив из десяти целых чисел написать программу подсчитывающую сколько раз в массиве встречается заданное с клавиатуры число b

Var i, b: integer; m: array [1..10] of integer; begin. for i: = 1 to 10 do readln (m[i],b); s: = 0 if (m[i] div 10 = b) or ( m[i] mod 10 = b) then s: =s+1 ну и концовку write (s); end.

В самом общем смысле компьютерная этика занимается исследованием поведения людей, использующих компьютер, на основе чего вырабатываются соответствующие нравственные предписания и своего рода этикетные нормы. Само употребление выражения «компьютерная этика» весьма условно, эта дисциплина очень молода, она появилась на рубеже 70-х — 80-х гг. XX столетия, и наряду с ней употребляются такие термины, как «информационная этика», «киберэтика».

Компьютерная этика представляет собой область междисциплинарного исследования и включает рассмотрение технических, моральных, юридических, социальных, политических и философских вопросов. Проблемы, анализируемые в ней, условно можно разделить на несколько классов: 1) проблемы, связанные с разработкой моральных кодексов для компьютерных профессионалов и простых пользователей, чья работа связана с использованием компьютерной техники; 2) проблемы защиты прав собственности, авторских прав, права на личную жизнь и свободу слова применительно к области информационных технологий; 3) группа проблем, связанных с появлением компьютерных преступлений, определением статуса, то есть преимущественно правовые проблемы.

В рамках компьютерной этики выделяется особая область, называемая «хакерской этикой», основание которой заложили хакеры, пионеры, стоявшие у истоков современных информационных технологий. А с развитием сети Интернет в обиход входит и понятие «сетевой этики» или «нэтикета» (производное от net — сеть и etiquette — этикет), обозначающее совокупность правил, сложившихся среди пользователей глобальной сети.

Система счисления значит, что число, являющееся основанием это 1 десяток. то есть в 8 с.с числа 8 нет => 7+1 = 10 в 8 с. с. для чисел, символов которых нет, используются буквы латинского алфавита. a(10), b(11) и т. решение: постепенно делим на два и записываем остаток 135 1 67 1 33 1 16 0 8 0 4 0 2 0 1 записываем снизу вверх и получаем 10000111 в двоичной системе счисления то же самое для восьмеричной, но делим на 8: 135 7 16 0 2 получаем 207 в восьмеричной с. с. да, в  шестнадцатеричной. 135 7 8 получилось 87.