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

Решить информатику на тему «одномерные массивы»


Решить информатику на тему «одномерные массивы»

👇
Открыть все ответы
Ответ:
kabirova2356
kabirova2356
19.11.2022
Var
  i, j, max, n, m: integer;
   ar: array[,]of integer;
 begin
  readln(n, m);
  setlength(ar, n, m);
  for i := 0 to n - 1 do
     for j := 0 to m - 1 do  ar[i, j] := random(0, 100);  
max := ar[0, 0];
  for i := 0 to n - 1 do
   begin
    for j := 0 to m - 1 do
     begin
      if(ar[i, j] > max) then max := ar[i, j];
    end;
   end;
  writeln('Максимальный элемент: ', max);
    for i := 0 to n - 1 do
     begin
      for j := 0 to m - 1 do write(ar[i, j]:4, ' ');
       writeln;
     end;
 end.
4,4(96 оценок)
Ответ:
keti261
keti261
19.11.2022

13.

numbers = input('Введите через пробел числа ==> ')

arr = numbers.split(' ')

arr = [int(i) for i in arr]

for i in range(1, len(arr)):

___arr[i] = arr[i] + 5

print(arr)

14.

while True:

___numbers = input('Введите числа через пробел ==> ')

___arr = numbers.split(' ')

___if not '' in arr and len(arr) % 2 == 0:

break

___else:

print('Ошибка! Введите четное число элементов или не ставьте в конце пробел!')

arr = [int(i) for i in arr]

for i in range(int(len(arr)/2)): #решение под буквой А

___arr[i] += 1

for z in range(int(len(arr)/2), len(arr)): #решение под буквой Б

___arr[z] *= 2

print(arr)

15.

numbers = input('Введите числа через пробел ==> ')

sum = 0

arr = numbers.split(' ')

arr = [int(i) for i in arr]

for i in range(len(arr)):

___sum += arr[i]

print(sum/len(arr))

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