Скворцов
?>

Подскажите что не так? пишет ошибку: нет индексного свойства по умолчанию для функционального типа program chisl; var a: array[1..10]of integer; i: integer; begin for i: =1 to 10 do begin writeln['a[', i, ']=']; read(a[i]); end; if a[i] mod 2 = 0 then begin write ('a[i]=', a[i]); end; end.

Информатика

Ответы

T91610933073266
  uses crt; var a: array[1..10]of integer; i: integer; beginfor i: =1 to 10 do   beginread(a[i]); if a[i] mod 2 = 0then   begin write ('a[',i,']=',a[i]);   writeln; end; end; end.
Andrei

Объяснение:

# Создание и инициализация матрицы 5x5

matrix = [[10, 2, 3, 4, 5],

         [6, 7, 8, 9, 10],

         [11, 12, 2, 14, 15],

         [16, 17, 18, 2, 20],

         [21, 22, 23, 24, 2]]

# Получение размеров матрицы

rows = len(matrix)

cols = len(matrix[0])

# Инициализация начального значения наименьшего элемента

min_element = matrix[0][cols - 1]  # Берем элемент в правом верхнем углу

# Поиск наименьшего элемента на боковой диагонали и двух соседних прямых

for i in range(rows):

   for j in range(cols):

       # Проверка, является ли текущий элемент наименьшим

       if (i == j or i + j == rows - 1 or j == 0 or j == cols - 1) and matrix[i][j] < min_element:

           min_element = matrix[i][j]

# Вывод наименьшего элемента

print("Наименьший элемент на боковой диагонали и двух соседних прямых:", min_element)

Обратите внимание, что данное решение предполагает, что матрица уже инициализирована соответствующими значениями. Вы можете изменить значения в матрице matrix или создать свою собственную матрицу размером 5x5 для проверки задачи.

h777eta

Объяснение:

Об'єкт редактора векторної графіки, який можна уявити як прозорий аркуш із зображеннями геометричних об'єктів та малюнків, називається "холст" або "робочий простір" (англ. canvas або workspace). На цьому холсті можна створювати, редагувати та маніпулювати різними векторними об'єктами, такими як лінії, криві, прямокутники, кола тощо, і також наносити малюнки та інші елементи на зображення. Холст зазвичай слугує робочим простором, де користувач може взаємодіяти з редактором та створювати векторні малюнки.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Подскажите что не так? пишет ошибку: нет индексного свойства по умолчанию для функционального типа program chisl; var a: array[1..10]of integer; i: integer; begin for i: =1 to 10 do begin writeln['a[', i, ']=']; read(a[i]); end; if a[i] mod 2 = 0 then begin write ('a[i]=', a[i]); end; end.
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

Марина_Мария
ivanov568
olegtarasov1965
Анна Марина1873
tboychenko
beliaeva2
igor-790
assistant
llmell6
marat7
komplekt7
dashanna04225
Gennadevna_Baidalina131
mg4954531175
zatoichi69