Artak96993298

12.02.2020

Дана программа. Определить результат выполнения. program N02 const A: array [1..10] of integer = (1, 36, 2, 18, 3, 12, 4, 9, 6, 6); var i, k: integer; begin k:=0; for i:=1 to 7 do if A[i]

Информатика

Ответить

Ответы

ellyb106786

12.02.2020

Массив находит количество элементов массива, которые меньше последующего.

Но смотрим внимательно, цикл идёт лишь до 7.

1 < 36, k = 1

36 > 2, k = 1

2 < 18, k = 2

18 > 3, k = 2

3 < 12, k = 3

12 > 4, k = 3

4 < 9, k = 4

ответ: k = 4

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

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

Дана программа. Определить результат выполнения. program N02 const A: array [1..10] of integer = (1, 36, 2, 18, 3, 12, 4, 9, 6, 6); var i, k: integer; begin k:=0; for i:=1 to 7 do if A[i]

▲

Дана программа. Определить результат выполнения. program N02 const A: array [1..10] of integer = (1, 36, 2, 18, 3, 12, 4, 9, 6, 6); var i, k: integer; begin k:=0; for i:=1 to 7 do if A[i]

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Объясните как решать a: x div 100 b: x mod 100div 10 c: x mod 10 s: a+b+c 248, 789, 125 , я вас объясните умоляю

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

Какова для вас ценность результатов измеренья выполненных автоматической космической станцией

(40 ) напишите развернутый ответ к : определите наименьшее натуральное число a, такое что выражение ( (x & 20 ≠ 0) \/ (x & 55 ≠ 0)) -> ((x & 7 = 0) -> (x & a ≠ 0)) тождественно...

Сообщение, записанное буквами из 16- символьного алфавита, содержит 60 символов.какой объем информации оно несёт? +

с информатикой у меня голова не соображает (

Укажите подсистему системы "Программное обеспечение компьютера"

Монитор пернетакта жүйесін блоктын атауы

Определи количество ячеек в диапазоне a1: a7.

Решит с ! в кодировке кои-8 каждый символ кодируется одним байтом. определите информационный объем сообщения из 30 символов в этой кодировке

Задано три дійсних числа напишіть програму яка виводить на екран мінімальне із чисел (pascal)

Синформатикой 100 б. лаб 2 , которую вы сделали есть здесь .

Дана программа. Определить результат выполнения. program N02 const A: array [1..10] of integer = (1, 36, 2, 18, 3, 12, 4, 9, 6, 6); var i, k: integer; begin k:=0; for i:=1 to 7 do if A[i]

Ответы

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

Ваше имя (никнейм)*

Email*

Комментарий*

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

Объясните как решать a: x div 100 b: x mod 100div 10 c: x mod 10 s: a+b+c 248, 789, 125 , я вас объясните умоляю

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

Какова для вас ценность результатов измеренья выполненных автоматической космической станцией

(40 ) напишите развернутый ответ к : определите наименьшее натуральное число a, такое что выражение ( (x &amp; 20 ≠ 0) \/ (x &amp; 55 ≠ 0)) -&gt; ((x &amp; 7 = 0) -&gt; (x &amp; a ≠ 0)) тождественно...

Сообщение, записанное буквами из 16- символьного алфавита, содержит 60 символов.какой объем информации оно несёт? +

с информатикой у меня голова не соображает (

Укажите подсистему системы "Программное обеспечение компьютера"

Монитор пернетакта жүйесін блоктын атауы​

Определи количество ячеек в диапазоне a1: a7.

Решит с ! в кодировке кои-8 каждый символ кодируется одним байтом. определите информационный объем сообщения из 30 символов в этой кодировке

Задано три дійсних числа напишіть програму яка виводить на екран мінімальне із чисел (pascal)

Синформатикой 100 б. лаб 2 , которую вы сделали есть здесь .

(40 ) напишите развернутый ответ к : определите наименьшее натуральное число a, такое что выражение ( (x & 20 ≠ 0) \/ (x & 55 ≠ 0)) -> ((x & 7 = 0) -> (x & a ≠ 0)) тождественно...

Монитор пернетакта жүйесін блоктын атауы