haritonukaleksa
14.10.2021 03:15

Определи временную сложность следующего алгоритма:

program p1;

var m, k, i, N :integer;

begin

m := 0;

k:=2;

N := 10;

for i:=1 to N do

begin

m := m + 1;

k := 2*k;

end;

end.​

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
Kotliarrostislav
11.01.2020 03:43

1

1. Ввод числа n с клавиатуры(пользователем)

2. Переменная res принимает значение 'NO'

3. Переменная a1 принимает значение 0

4. Переменная а2 принимает значение 0

5. Пока n больше 0 выполнять цикл:

   6. Переменная a1 принимает значение остатка от деления введенного    числа на 10

   7. Переменная а2 принимает значение остатка от целочисленного деления введенного числа на 1(пример целочисленного деления: 12 // 5 = 2)

   8. Если переменная а1 равна переменной а2, то выполнить условие

       9. Переменная res принимает значение 'YES'

   10. Введенное число нацело делится на 10.

11. Вывести переменную res

2

1. Ввод числа n с клавиатуры

2. Переменная res принимает значение 'NO'

3. Переменной d1 присваивается значение 0

4. Переменной d2 присваивается значение 0

5. Пока введенное число больше 0 выполнять цикл:

   6. Переменная d1 принимает значение остатка от деления введенного числа на 10

   7. Переменная m принимает целочисленное деление переменной d2 на 10

   8. Пока переменная m больше 0 выполнять цикл:

       9. Переменной d2 присвоить значение остатка от деления m на 10

       10. Если переменная d1 равна переменной d2, то выполнить условие:

           11. Переменной res присвоить значение 'YES'

       12. Присвоить переменной m значение целочисленного деления m на 10

   13. Присвоить переменной n результат целочисленного деления n на 10

14. Вывести переменную res

Вроде ничего не упустил.

0,0(0 оценок)
Ответ:
kklll1g
03.10.2022 02:50
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Количество строк в массиве:');
  var m:=ReadInteger('Количество столбцов в массиве:');
  Writeln('*** Исходный массив [',n,',',m,'] ***');
  var a:=MatrRandom(n,m,-99,99);
  a.Println(4); Writeln(4*a.ColCount*'-');
  Writeln('Кол-во положительных: ',a.ElementsByRow.Where(x->x>1).Count)
end.

Пример
Количество строк в массиве: 5
Количество столбцов в массиве: 12
*** Исходный массив [5,12] ***
 -64  16  -1  59 -63 -37 -54  28 -40  39  17 -84
  89   8  38  56 -51  20  49  28 -90 -85   1  81
  13  52 -10  15  28 -95  76 -77 -54 -27  33  -9
  22  43 -40  14  58  19 -75  26  92  94 -59  87
 -95  -8  65 -24 -50  62  26 -79 -85  18 -54 -16

Кол-во положительных: 32
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота