movlam11
?>

Взаданном массиве a[n; n] определить сумму элементов в каждом столбце. сформируйте одномерный массив, содержащий полученные суммы, расположенные по убыванию

Информатика

Ответы

opscosmiclatte7868
Const
  N = 5;
 var
  i, j: integer;
  ar: array[1..N, 1..N]of integer;
  ms: array[1..N]of integer;
 begin
  for i := 1 to N do
    for j := 1 to N do
    begin
      read(ar[i, j]);
      ms[i] := ms[i] + ar[i, j];
    end;
    writeln;
  ms.sorted.print;
end.
Irinagarmonshikova

A = [] # создаем массив  

step = 3 #  создаем переменную , которая является началом нашего ряда  

while sum(A) < 15: # пока сумма нашего массива меньше 15 (sum - складывает все элементы нашего массива)

   A.append(step) # мы добавляем в  массив число

   step +=1 # и увеличиваем число в ряду на 1

print(sum(A)) # после выполнения цикла  выводим сумму  массива

A = [] # создаем массив  

step = 3 #  создаем переменную , которая является началом нашего ряда  

Num = int(input()) # просим у пользователя ввести число  

while sum(A) < Num: # пока сумма нашего массива меньше  (sum - складывает все элементы нашего массива)

   A.append(step) # мы добавляем в  массив число

   step *= 2 # умножаем шаг ряда на 2

print(sum(A)) # после выполнения цикла  выводим сумму  масиива  

Объяснение:

proporcia46

3

Объяснение:

Процедура delete имеет следующий вид: delete([строка], [идекс], [количество]) - т.е. из строки [строка] с позиции [индекс] будет удалено [количество] символов. На твоём примере: пока длина строки s больше 0 с позиции 1 удаляем два символа и выводим на экран единицу. На первой итерации цикла строка "123456" превратится в строку "3456", на второй итерации в "56" и на последней, третей итерации в "". Итого, чтобы длина строки стала 0 потребовалось 3 итерации, т.е. на экран выведется три единицы

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

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

Взаданном массиве a[n; n] определить сумму элементов в каждом столбце. сформируйте одномерный массив, содержащий полученные суммы, расположенные по убыванию
Ваше имя (никнейм)*
Email*
Комментарий*

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

Станиславович ыфвыв
MArat
Нескажу25
danya1509379
len22
marinakmaa86
evavard
steger
alenih13
korotinadasha07
Yelena Dilyara
Ruslan Zarekovkin
d5806252
Энверович
poiskmarina