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

Ввести с клавиатуры двухмерный массив размерностью 4х6,заполненный целыми числами. сформировать одномерный массив, каждый элемент которого оавен количеству элементов соответствующей строки, больших заданного числа n.

👇
Ответ:
omararu2006
omararu2006
01.12.2022
Program test;

var
  a:array[1..4,1..6] of integer;
  b:array[1..4] of integer;
  i,i1,max,n,sum:integer;
label m1;
begin
  write('Введите елементы массива: ');
  for i:=1 to 4 do begin
    for i1:=1 to 6 do begin
      write('a[',i,',',i1,'] = ');
      readln(a[i,i1]);
    end;
  end;
  for i:=1 to 4 do begin
    for i1:=1 to 6 do begin
      if i+i1 = 2 then max:=a[1,1]
      else if a[i,i1]>max then max:=a[i,i1] else max:=max;
    end;
  end;
   m1: 
 write('Введите число (не больше  ',max,') : ');
readln(n);
  if n<=max then begin
   for i:=1 to 4 do begin
    for i1:=1 to 6 do begin
      if a[i,i1]>n then sum:=sum+1;
    end;
      b[i]:=sum;
      writeln('b[',i,'] = ',b[i]);
      sum:=0;
  end;
  end
  else begin
    writeln('Число больше максимального значения массива, поробуйте снова');
    goto m1;
  end;
end.
4,5(82 оценок)
Открыть все ответы
Ответ:

Изменения в жизни общества, связанные с бурным развитием информационной сферы, привели к появлению концепции информационного общества.

Концепция информационного общества

Термин « информационное общество» ввел профессор Токийского технологического института. Ю. Хаяши еще в 1969 году, когда японскому правительству были представлены отчёты «Японское информационное общество: темы и подходы», а в 1971 году — «План информационного общества».

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

Три года назад, 27 марта 2006 года генеральная Ассамблея ООН провозгласила 17 мая Международным днем информационного общества

Что же такое информационное общество? В чем его особенность? Каковы проблемы? Существуют ли пути их преодоления? На эти вопросы я постараюсь ответить в своей работе.

На мой взгляд, концепция информационного общества еще будет дорабатываться, поскольку изменяется и расширяется информационная сфера. На сегодняшний день так определяют информационное общество:

Информационное общество - новая историческая фаза развития цивилизации, в которой главными продуктами производства являются информация и знания. Отличительными чертами информационного общества являются:

- увеличение роли информации и знаний в жизни общества;

- возрастание доли информационных коммуникаций, продуктов и услуг в валовом внутреннем продукте;

- создание глобального информационного пространства, обеспечивающего эффективное информационное взаимодействие людей, их доступ к мировым информационным ресурсам и удовлетворение их потребностей в информационных продуктах и услугах.

4,4(18 оценок)
Ответ:
SmokeSivunenko
SmokeSivunenko
01.12.2022

Объяснение:

Мы находим функции прямых, ограничивающих область (по точкам).

Эти прямые дают координаты Y точки по её координате X.

Если некая y = f(x) в точке X0 принимает Y0 и это соответствует введенным значениям, то введенная точка лежит на прямой.

Но нам интересны значения в области. Если введенное значение Y больше рассчитанного Y0, то (X; Y) находится выше прямой y = f(x).

Если же меньше рассчитанного, то ниже.

Смотря на рисунок мы определяем, какие прямые у нас имеются, и где должна быть точка, чтобы находиться внутри области: выше или ниже прямых, ограничивающих область (для каждой прямой).

Потом переносим это в виде условия.

Пример на Python:

def get_line_by_two_points(x0: float, y0: float, x1: float, y1: float):

   def line_y(x: float):

       return (x - x0)/(x1 - x0) * (y1 - y0) + y0

   return line_y

l1 = get_line_by_two_points(-3, 7, -6, 1)  # Левая наклонная

l2 = get_line_by_two_points(7, 1, 4, 7)  # Правая наклонная

x_value = int(input("Enter an X value: "))

y_value = int(input("Enter a Y value: "))

if 1 < y_value < 7 and y_value < l1(x_value) and y_value < l2(x_value):

   print("Point is in the space!")

else:

   print("Point is NOT in the space!")

4,8(14 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ