В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
kacamber228
kacamber228
03.01.2021 00:54 •  Информатика

информатика работа с файлами урок первый


информатика работа с файлами урок первый

Показать ответ
Ответ:
soldatgtr
soldatgtr
25.04.2023 16:54

const n = 10; //В константе n указываем количество элементов в массиве

var a:array[1..n]of integer;

i,s,max,min:integer;

begin

write('Массив: '); //Вывод на экран слова "Массив: "

for i:= 1 to n do //Цикл с параметром для последовательной обработки массива

begin

a[i]:= random(21)-10; //Заполнение массива случайными числами из промежутка [-10,10]

if (a[i]>0){//Проверяем положительный элемент или нет} and (a[i] mod 2 = 0){//Проверяем чётный элемент или нет} then s:=s+1; //В переменной s будет считаться количество чётных положительных элементов при выполнении, указанных условий

write(a[i],'  ') //Вывод на экран массива в строку

end;

writeln; //Переход на новыю строку

if s=0 then write('Чётных положительных элементов в массиве нет') //Вывод на экран сообщения "Чётных положительных элементов в массиве нет" и завершение программы

else //Продолжении программы при нахождении хотя бы 1-го чётного положительного элемента

begin

max:=2; //Т.к. 2 минимальное чётное положительное число, то присваиваем это значение переменной max

for i:= 1 to n do //Поиск max элемента

if (a[i]>0) and (a[i] mod 2 = 0) and (a[i]>max){//Проверяем больше текущий элемент max или нет} then max:=a[i]; //Присваиваем переменной max значение текущего элемента при выполнении, указанных условий

min:=max; //Т.к. max значение элемента массива уже найдено, то переменной min присваиваем значение переменной max

for i:= 1 to n do //Поиск min элемента

if (a[i]>0) and (a[i] mod 2 = 0) and (a[i]<min){//Проверяем меньше текущий элемент min или нет} then min:=a[i]; //Присваиваем переменной min значение текущего элемента при выполнении, указанных условий

if max=min then write ('Максимальным и минимальным чётным положительным элементом является один и тот же элемент: ',max) //Вывод на экран результатов

else

begin

writeLn('Максимальный чётный положительный элемент: ',max);//Вывод на экран результатов

write('Минимальный  чётный положительный элемент: ',min)//Вывод на экран результатов

end

end

end.

0,0(0 оценок)
Ответ:
Dasulya21
Dasulya21
24.01.2021 16:51
Объективные законы развития информационной сферы и информационных отношений 
К общим законам для информационной сферы можно отнести объективный закон организации и ограничения информации в социальных системах: чем выше уровень организованности системы (где информация выступает одновременно и средством организации системы, и качественной характеристикой степени ее организованности), тем выше должен быть уровень регуляции и ограничений. В условиях многократно возрастающего объема потребляемой информации, формирования информационного общества, при отсутствии гражданского общества, ответственность за социальное регулирование этих процессов лежит, прежде всего, на государстве. Это положение нашло отражение в Доктрине информационной безопасности РФ, где сделан вывод: "совершенствование правовых механизмов регулирования общественных отношений, возникающих в информационной сфере, является приоритетным направлением государственной политики в области обеспечения информационной безопасности РФ".- 
Другим объективным законом развития информационной сферы, что находит свое отражение и в переходном периоде к информационному обществу, является закон информационного опережения: решение проблем  должно опережать по времени каждый очередной шаг в других сферах социальной деятельности, что дает возможность полнее координировать реформы, создавать благоприятные условия для функционирования рынков товаров, услуг, капиталов и рабочей силы, обеспечивать равное право на приобретение в собственность имущества, владение, пользование и распоряжение им, проводить согласованную политику в различных сферах. Единое  должно предшествовать созданию единого экономического и правового пространства, равно какинформационное обеспечение должно опережать каждый очередной шаг в принятии решения в разных социальных сферах. Из этого следует и обратное - нерешение проблем информационного взаимодействия или запаздывание здесь обязательно приведет к серьезному отставанию и в других сферах социальной деятельности, что сегодня и происходит. По-видимому, и этим продиктован призыв руководителей "восьмерки" в Окинавской Хартии Глобального Информационного Общества (2000) ликвидировать международный разрыв в области информации и знаний, а также обусловлен вывод о том, что "солидная основа политики и действий в сфере ИТ может изменить методы нашего взаимодействия по продвижению социального и экономического прогресса во всем мире". 
К общим законам информационного взаимодействия следует отнести и группу законов, касающихся организации и деятельности сложных систем, которые открыл еще в начале XX в. А. А. Богданов в своей "Тектологии"-. Суть этих законов(законы аддитивности, (от лат. addere - добавлять) заключается в том, что суммарный потенциал системы 
определяется характером взаимодействия ее подсистем. Так, если подсистемы индифферентны (равнодушны) к друг другу, то суммарный потенциал системы эквивалентен потенциалу одной из подсистем. Если же подсистемы находятся в состоянии войны каждой с каждой, то потенциал системы меньше потенциала 
самой слабой из подсистем. И в случае, если взаимодействие всех подсистем носит целенаправленный характер, то потенциал системы много больше суммы потенциалов всех подсистем. Это закон сверхаддитивности, когда целое больше суммы его частей. 
В области производства информации действует объективный закон неполного использования информации, в том числе при принятии решений в управленческой деятельности, что определяется как парадоксом избыточности информации, так и не недобросовестностью) субъектов к ее полному использованию. В действующем законодательстве в этой области выделяют "производство", "создание", "преобразование" информации. Правовое регулирование присутствует здесь в виде регулятивных норм созданию организационных и экономических предпосылок развития и совершенствования информационного производства; в виде гарантий свободы творчества, поведения, образования и т. п.; в виде охраны и защиты прав на объекты интеллектуальной собственности, а также в виде запретов на производство "вредной" информации. 
В области распространения информации действует объективный закон искажения информации по мере ее движения, что связано с различной и готовностью субъектов к ее восприятию. Законодатели здесь едины, выделяя только "распространение" информации. В то же время отношения, связанные с передачей информации, что закреплено в ст. 29 Конституции РФ и также относится к распространению информации, не нашли должного отражения взаконодательстве. По распространения можно выделить непосредственное и опосредованное распространение. 
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота