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

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

  • автор:

Решу ЕГЭ и Незнайка объединились,

чтобы запустить свои курсы ЕГЭ в Тик-Ток формате. Никаких скучных вебинаров, только залипательный контент!

Готовься к ЕГЭ в Тик-Ток формате

«Незнайка» и «Решу ЕГЭ» запускают свои курсы подготовки. Короткие видео, много практики и нереальная польза!

Задание № 12565

Определите, что будет напечатано в результате работы следующей программы. Текст программы приведен на трех языках программирования.

Алгоритмический язык

Рассмотрим вариант на Паскаль. Т.к. цикл for будет выполняться от k=5 до k=12, он пройдет 8 раз, т.е. тело внутри цикла будет выполнено ровно 8 раз

Какое число будет напечатано в результате выполнения программы?

Какое значение будет напечатано в результате выполнения программы?
Какое значение будет напечатано в результате выполнения программы? type mass=array of integer;.

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

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

Определите, какое число будет напечатано в результате выполнения следующего алгоритма:
Определите, какое число будет напечатано в результате выполнения следующего алгоритма: def F(x).

Var k, m : integer ; Dat [1] : = 12 ; Dat [2] : = 15 ; Dat [3] : = 17 ; Dat [4] : = 15 ; Dat [5] : = 14 ; Dat [6] : = 12 ; Dat [7] : = 10 ; Dat [8] : = 13 ; Dat [9] : = 14 ; Dat [10] : = 15 ; m : = 0 ?

Var k, m : integer ; Dat [1] : = 12 ; Dat [2] : = 15 ; Dat [3] : = 17 ; Dat [4] : = 15 ; Dat [5] : = 14 ; Dat [6] : = 12 ; Dat [7] : = 10 ; Dat [8] : = 13 ; Dat [9] : = 14 ; Dat [10] : = 15 ; m : = 0 ; for k : = 1 to 10 do if Dat [k]&gt ; 12 then begin m : = Dat [k] end ; writeln(m) ; End.

я полностью уверен в этом.

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя ; Dat[2] — за второго и т?

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя ; Dat[2] — за второго и т.

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

Текст программы приведён на трёх языках программирования.

Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1 : 10] цел k, m Dat[1] : = 16 Dat[2] : = 20 Dat[3] : = 20 Dat[4] : = 41 Dat[5] : = 14 Dat[6] : = 21 Dat[7] : = 28 Dat[8] : = 12 Dat[9] : = 15 Dat[10] : = 35 m : = 0 нц для k от 1 до 10 если Dat[k]&gt ; m то m : = Dat[k] все кц вывод m кон DIM Dat(10) AS INTEGER DIM k, m AS INTEGER Dat(1) = 16 : Dat(2) = 20 Dat(3) = 20 : Dat(4) = 41 Dat(5) = 14 : Dat(6) = 21 Dat(7) = 28 : Dat(8) = 12 Dat(9) = 15 : Dat(10) = 35 m = 0 FOR k = 1 TO 10 IF Dat(k)&gt ; m THEN m = Dat(k) ENDIF NEXT k PRINT m Var k, m : integer ; Dat : array[1.

10] of integer ; Begin Dat[1] : = 16 ; Dat[2] : = 20 ; Dat[3] : = 20 ; Dat[4] : = 41 ; Dat[5] : = 14 ; Dat[6] : = 21 ; Dat[7] : = 28 ; Dat[8] : = 12 ; Dat[9] : = 15 ; Dat[10] : = 35 ; m : = 0 ; for k : = 1 to 10 do if Dat[k]&gt ; m then begin m : = Dat[k] end ; writeln(m) ; End.

Var k, m : integer ; Dat : array[1?

Var k, m : integer ; Dat : array[1.

for k : = 1 to 10 do

С пояснениями, пожалуйста!

Алг нач целтаб Dat[1 : 8] Dat[1] : = 7 ; Dat[2] : = 7 Dat[3] : = 6 ; Dat[4] : = 8 Dat[5] : = 4 ; Dat[6] : = 5 Dat[7] : = 1 : Dat[8] : = 7 term : = 1 m : = Dat[1] нц для k от 2 до 8 если Dat [k]&gt ; m?

Алг нач целтаб Dat[1 : 8] Dat[1] : = 7 ; Dat[2] : = 7 Dat[3] : = 6 ; Dat[4] : = 8 Dat[5] : = 4 ; Dat[6] : = 5 Dat[7] : = 1 : Dat[8] : = 7 term : = 1 m : = Dat[1] нц для k от 2 до 8 если Dat [k]&gt ; m то m : = Dat[k] term : = k все кц вывод term кон НАПИШИТЕ ПОЛНОЕ РЕШЕНИЕ , КАК РЕШАТЬ ЭТО?

В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] – данные за понедельник, Dat[2] – за вторник и т?

В таблице Dat хранятся данные измерений среднесуточной температуры за неделю в градусах (Dat[1] – данные за понедельник, Dat[2] – за вторник и т.

Определите, что будет напечатано в результате выполнения следующего алгоритма Var k, m, day : integer ; Dat : array[1.

7] of integer ; Begin Dat[1] : = 7 ; Dat[2] : = 9 ; Dat[3] : = 10 ; Dat[4] : = 8 ; Dat[5] : = 6 ; Dat[6] : = 7 ; Dat[7] : = 6 ; day : = 1 ; m : = Dat[1] ; for k : = 2 to 7 do begin if Dat[k] &lt ; m then begin m : = Dat [k] ; day : = k end end write(day) ; End.

В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второ?

В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второго числа и т.

Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трёх алгоритмических языках.

Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1 : 10] цел k, m, day Dat[1] : = 2 Dat[2] : = 2 Dat[3] : = 3 Dat[4] : = 3 Dat[5] : = 4 Dat[6] : = 4 Dat[7] : = 5 Dat[8] : = 5 Dat[9] : = 6 Dat[10] : = 6 day : = 1 ; m : = Dat[1] нц для k от 2 до 10 если Dat[k] &gt ; = m то m : = Dat[k] day : = k все КЦ вывод day КОН DIM Dat(10) AS INTEGER Dat[1] = 2 Dat[2] = 2 Dat[3] = 3 Dat[4] = 3 Dat[5] = 4 Dat[6] = 4 Dat[7] = 5 Dat[8] = 5 Dat[9] = 6 Dat[10] = 6 day = 1 : m = Dat(1) FOR k = 2 TO 10 IF Dat(k) &gt ; = m THEN m = Dat(k) day = k END IF NEXT k PRINT day END Var k, m, day : integer ; Dat : array[1.

10] of integer ; Begin Dat[1] : = 2 ; Dat[2] : = 2 ; Dat[3] : = 3 ; Dat[4] : = 3 ; Dat[5] : = 4 ; Dat[6] : = 4 ; Dat[7] : = 5 ; Dat[8] : = 5 ; Dat[9] : = 6 ; Dat[10] : = 6 ; day : = 1 ; m : = Dat[1] ; for k : = 2 to 10 do if Dat[k] &gt ; = m then begin m : = Dat[k] ; day : = k ; end ; write(day) ; End.

В таблице Dat хранятся данные о количестве сделанных заданий учениками (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т?

В таблице Dat хранятся данные о количестве сделанных заданий учениками (Dat[1] заданий сделал первый ученик, Dat[2] – второй и т.

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

Текст программы приведён на трёх языках программирования.

Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat[1 : 10] цел к, s Dat[1] : = 7 Dat[2] : = 9 Dat[3] : = 10 Dat[4] : = 5 Dat[5] : = 6 Dat[6] : = 7 Dat[7] : = 9 Dat[8] : = 8 Dat[9] : = 6 Dat[10] : = 9 s : = 0 нц для к от 1 до 10 s : = s + Dat[k] все КЦ вывод s КОН DIM Dat(10) AS INTEGER DIM k, m, n AS INTEGER Dat[1] = 7 Dat[2] = 9 Dat[3] = 10 Dat[4] = 5 Dat[5] = 6 Dat[6] = 7 Dat[7] = 9 Dat[8] = 8 Dat[9] = 6 Dat[10] = 9 s = 0 FOR k : = 1 TO 10 IF Dat(k) &lt ; m THEN s : = s + Dat[k] ENDIF NEXT k PRINT s Var k, m, n : integer ; Dat : array[1.

10] of integer ; Begin Dat[1] : = 7 ; Dat[2] : = 9 ; Dat[3] : = 10 ; Dat[4] : = 5 ; Dat[5] : = 6 ; Dat[6] : = 7 ; Dat[7] : = 9 ; Dat[8] : = 8 ; Dat[9] : = 6 ; Dat[10] : = 9 ; s : = 0 ; for k : = 1 to 10 do s : = s + Dat[k] ; writeln(s) ; End.

В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второ?

В таблице Dat хранятся данные о количестве самолётов, отправляющихся из аэропорта города на юг в первой декаде августа (Dat[1] — количество самолётов первого числа, Dat[2] — количество самолётов второго числа и т.

Определите, что будет напечатано в результате выполнения следующего алгоритма, записанного на трёх алгоритмических языках.

Var k, m, day : integer ; Dat : array[1.

10] of integer ; Begin Dat[1] : = 2 ; Dat[2] : = 2 ; Dat[3] : = 3 ; Dat[4] : = 3 ; Dat[5] : = 2 ; Dat[6] : = 2 ; Dat[7] : = 5 ; Dat[8] : = 5 ; Dat[9] : = 6 ; Dat[10] : = 6 ; day : = 1 ; m : = Dat[1] ; for k : = 2 to 10 do if Dat[k] = &lt ; m then begin m : = Dat[k] ; day : = k ; end ; write(day) ; End.

Объясните пожалуйста по подробнее.

Объясните пожалуйста как это делатьалгначцелтаб Dat[1 : 11]цел к,mDat[1] : = 20Dat[2] : = 27Dat[3] : = 19Dat[4] : = 28Dat[5] : = 26Dat[6] : = 22Dat[7] : = 24Dat[8] : = 28Dat[9] : = 26Dat[10] : = 21Dat?

Объясните пожалуйста как это делать

целтаб Dat[1 : 11]

нц для к от 1 до 11

если Dat[к] 5 сент. 2020 г., 20:57:19 | 10 — 11 классы

В таб­ли­це Dat хра­нят­ся дан­ные о ко­ли­че­стве уче­ни­ков в клас­сах (Dat[1] — ко­ли­че­ство уче­ни­ков в пер­вом клас­се, Dat[2] — во вто­ром и т?

В таб­ли­це Dat хра­нят­ся дан­ные о ко­ли­че­стве уче­ни­ков в клас­сах (Dat[1] — ко­ли­че­ство уче­ни­ков в пер­вом клас­се, Dat[2] — во вто­ром и т.

Опре­де­ли­те, какое число будет на­пе­ча­та­но в ре­зуль­та­те ра­бо­ты сле­ду­ю­щей про­грам­мы.

Текст про­грам­мы при­ведён на трёх язы­ках про­грам­ми­ро­ва­ния.

Ал­го­рит­ми­че­ский язык алг нач цел­таб Dat[1 : 11] цел к, m Dat[1] : = 20 Dat[2] : = 25 Dat[3] : = 19 Dat[4] : = 25 Dat[5] : = 26 Dat[6] : = 22 Dat[7] : = 24 Dat[8] : = 28 Dat[9] : = 26 Dat[10] : = 21 Dat[11] : = 27 m : = 0 нц для к от 1 до 11 если Dat[к] &gt ; 22 то m : = m + 1 все КЦ вывод m КОН Бейсик DIM Dat(11) AS INTEGER DIM k, m AS INTEGER Dat[1] = 20 Dat[2] = 25 Dat[3] = 19 Dat[4] = 25 Dat[5] = 26 Dat[6] = 22 Dat[7] = 24 Dat[8] = 28 Dat[9] = 26 Dat[10] = 21 Dat[11] = 27 m = 0 FOR k : = 1 TO 11 IF Dat(k) &gt ; 22 THEN m = m + 1 ENDIF NEXT k PRINT m Паскаль Var k, m : integer ; Dat : array[1.

11] of integer ; Begin Dat[1] : = 20 ; Dat[2] : = 25 ; Dat[3] : = 19 ; Dat[4] : = 25 ; Dat[5] : = 26 ; Dat[6] : = 22 ; Dat[7] : = 24 ; Dat[8] : = 28 ; Dat[9] : = 26 ; Dat[10] : = 21 ; Dat[11] : = 27 ; m : = 0 for k : = 1 to 11 do if Dat[k] &gt ; 22 then begin m : = m + 1 ; end ; writeln(m) ; End.

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя ; Dat[2] — за второго и т?

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat[1] — количество голосов, поданных за первого исполнителя ; Dat[2] — за второго и т.

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

Текст программы приведён на трёх языках программирования.

Var k, m : integer ; Dat : array[1.

10] of integer ; Begin Dat[1] : = 16 ; Dat[2] : = 20 ; Dat[3] : = 20 ; Dat[4] : = 41 ; Dat[5] : = 14 ; Dat[6] : = 21 ; Dat[7] : = 28 ; Dat[8] : = 12 ; Dat[9] : = 15 ; Dat[10] : = 35 ; m : = 0 ; for k : = 1 to 10 do if Dat[k]&gt ; m then begin m : = Dat[k] end ; writeln(m) ; End.

Объясните по подробнее пожалуйста.

Вы зашли на страницу вопроса Var k, m : integer ; Dat [1] : = 12 ; Dat [2] : = 15 ; Dat [3] : = 17 ; Dat [4] : = 15 ; Dat [5] : = 14 ; Dat [6] : = 12 ; Dat [7] : = 10 ; Dat [8] : = 13 ; Dat [9] : = 14 ; Dat [10] : = 15 ; m : = 0 ?, который относится к категории Информатика. По уровню сложности вопрос соответствует учебной программе для учащихся 5 — 9 классов. В этой же категории вы найдете ответ и на другие, похожие вопросы по теме, найти который можно с помощью автоматической системы «умный поиск». Интересную информацию можно найти в комментариях-ответах пользователей, с которыми есть обратная связь для обсуждения темы. Если предложенные варианты ответов не удовлетворяют, создайте свой вариант запроса в верхней строке.

Решение задач типа 10 ГИА по информатике

Подготовка к ГИА по информатике

Решение задач типа 10 ГИА по информатике предполагают умение исполнить циклический алгоритм обработки массива чисел, записанный на алгоритмическом языке.

Рассмотрим решение подобной задачи на примере задачи ГИА 10 демоверсии ФИПИ 2013 года:

В таблице Dat хранятся данные о численности учеников в классах (Dat[1] – число учеников в первом классе, Dat[2] – во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.

Решение:

Рассмотрим программу пошагово. Итак, в самом начале объявляются переменные, которые будут использоваться (переменные k и m), а так же массив Dat, содержащий 11 элементов (от 1 до 11).

Примечание. В массиве Dat, который описан на языке Basic будет 12 элементов, так как нумерация начинается не с первого элемента, а с нулевого.

Алгоритмический язык Бейсик Паскаль
целтаб Dat[1:11]
цел k, m
DIM Dat(11) AS INTEGER
DIM k,m AS INTEGER
Var k, m: integer;
Dat: array[1..11] of integer;

Далее идет заполнение массива. Например, элементу массива с индексом 1 присваивается значение 20, элементу с индексом 2 — 25 и так далее. В итоге полученный массив можно представить в таком виде:

Индекс 1 2 3 4 5 6 7 8 9 10 11
Значение 20 25 19 25 26 22 24 28 26 21 27

Далее переменной m присваивается значение 0. После чего начинается цикл с параметром k, при этом k изменяется от 1 до 11 с шагом 1.

В теле цикла происходит проверка условия

Алгоритмический язык Бейсик Паскаль

Значение элемента массива с индексом k сравнивается с числом 22. Если элемент массива больше 22, то переменная m увеличивается на 1. В противном случае ничего не происходит.

В самом конце программы на экран выводится значение переменной m.

Итак, мы перевели программу на человеческий язык, теперь давайте подумаем, что же в итоге получим после ее выполнения. Нас интересует цикл — именно там происходит изменение значения переменной m. До цикла ее значение равно нулю. Далее программа перебирает все элементы массива и сравнивает их с числом 22. И если элемент массива больше 22, то переменная m увеличивается на 1. Таким образом, нам необходимо посчитать все элементы массива, которые больше 22 — их число и будет равно значению переменной m. Таких элементов 7 — это элементы с индексами 2, 4, 5, 7, 8, 9 и 11.

Следует обратить внимание на элемент под номером 6, который равен 22. Так как сравнение у нас строгое ( знак > ), то его мы не учитываем, так как 22 не больше 22. Учитывать его можно было бы в том случае, если бы в сравнении стоял знак >=.

Добавить комментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *