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

На крупном производственном предприятии в последние годы отмечается уменьшение доли прибыли,

текучесть кадров, снижение эффективности бизнеспроцессов и другие негативные явления. Руководство

предприятия связывает эти процессы с отсутствием

корпоративной информационной системы. При этом

предприятие имеет более чем 50-летнюю историю

существования, основные производственные процессы

поддерживаются соответствующими

информационными технологиями, в структуре

предприятия имеется отдел автоматизированных систем

управления предприятием, ведущие специалисты

которого имеют опыт разработки ИС.

Какой подход к разработке ИС вы бы рекомендовали в

данном случае? Поясните ваш выбор.

Показать ответ
Ответ:
Алекс23102027
Алекс23102027
11.05.2022 09:42

У Вас файл должен заканчиваться .html

Проще всего это сделать открыв текстовый блокнот, написать туда Ваш HTML код, нажать свойства -> сохранить как -> Выбрать внизу тип "Все файлы" и после чего в названии файла написать [Названия файла].html

После чего ищите место куда Вы его сохранили. Как найдёте, нажимаете правую кнопку мыши и открыть при После чего выбираете браузер которым Вы пользуетесь.

Если же Вам нужно изменить файл, тогда его открываете не через браузер, а через любой текстовый редактор.

0,0(0 оценок)
Ответ:
Messidarcelona05
Messidarcelona05
10.02.2021 17:56
// PascalABC.NET 3.0, сборка 1144 от 16.01.2016
begin
  var n:=ReadInteger('n=');
  var a:=ArrRandom(n,-50,50);
  Writeln('Исходный массив'); a.Println;
  var se:=a.Where(x->x mod 3=0);
  if se.Count=0 then
    Writeln('В массиве нет элементов, кратных трем')
  else begin
    var b:=se.Max;
    var i:=0;
    while a[i]<>b do Inc(i);
    if i=n-1 then Writeln('Максимальный элемент - последний')
    else begin
      Writeln('Результирующий массив');
      a[i+1]:=abs(a.Where(x->x<0).Sum); a.Println
      end
    end
end.

Тестовое решение:
n= 15
Исходный массив
-24 -38 15 -33 -40 -18 21 34 20 49 -19 29 29 38 -41
Результирующий массив
-24 -38 15 -33 -40 -18 21 213 20 49 -19 29 29 38 -41
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота