В таблице dat представлены данные о количестве. Подробное решение задач огэ по информатике. Сделаем условия в обратном порядке

Доступный и понятный материал для изучения задании 9 и 10 ОГЭ по Информатике + задания для отработки

Просмотр содержимого документа

Алгоритмический язык
алг нач цел s, k s:= 8 нц для k от 3 до 8 s:= s + 8 кц вывод s кон	DIM k, s AS INTEGER s = 8 FOR k = 3 TO 8 s = s + 8 NEXT k PRINT s	Var s,k: integer; Begin s:= 8; for k:= 3 to 8 do s:= s + 8; writeln(s); End.

Решение :

Как видим, в теле цикла только одна команда s:= s + 8. Т. е. эта операция будет выполняться на каждой итерации (на каждом шаге) цикла.

В теле цикла происходит увеличение значения переменной s на 8. Так как параметр цикла увеличивается от 3 до 8 с шагом 1, то при выполнении программы тело цикла будет выполняться 6 раз (k будет равно 3, 4, 5, 6, 7, 8). Т. е. переменная s увеличитая на 8 * 6 = 48. А так как начальное значение переменной s = 8 и после выполнения программы оно увеличится на 48, то в конечном итоге значение переменной s станет равным 56.

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

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

Алгоритмический язык
целтаб Dat цел k , m Dat := 20; Dat := 25 Dat := 19; Dat := 25 Dat := 26; Dat := 22 Dat := 24; Dat := 28 Dat := 26; Dat := 21 Dat := 27 m:= 0 нцдля k от 1 до 11 если Dat[k] 22 то	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) 22 THEN m = m + 1 END IF NEXT k	Var k, m: integer; Begin Dat := 20; Dat := 25; Dat := 19; Dat := 25; Dat := 26; Dat := 22; Dat := 24; Dat := 28; Dat := 26; Dat := 21; Dat := 27; m:= 0; for k:= 1 to 11 do if Dat[k] 22 then begin m:= m + 1

Ответ: ___________________________.

Решение :

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

Массив Dat

Значение

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

Итак, правильный ответ 7.

Просмотр содержимого презентации
«Решение задании 9 и 10 ОГЭ по Информатике»

Решение задании

по информатике

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

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

Бейсик

алг нач цел s, k s:= 8 нц для k от 3 до 8 s:= s + 8 кц вывод s кон

Паскаль

DIM k, s AS INTEGER s = 8 FOR k = 3 TO 8 s = s + 8 NEXT k PRINT s

Var s,k: integer; Begin s:= 8; for k:= 3 to 8 do s:= s + 8; writeln(s); End.

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

Ответ: ___________________________.

Решение :

• Итак, рассмотрим этот алгоритм, записанный на разных языках.
• Вначале объявляется, что будут использованы переменные k и s целочисленного типа
• Далее переменной s присваивается значение 8.
• После этого описывается цикл, где в качестве параметра выступает переменная k, которая изменяется от 3 до 8 с шагом 1 (т. е. будет принимать последовательно значения 3, 4, 5, 6, 7 и 8).
• В теле цикла только одна команда s:= s + 8. Т. е. эта операция будет выполняться на каждой итерации (на каждом шаге) цикла.
• И в самом конце на экран выводится значение переменной s
• В теле цикла происходит увеличение значения переменной s на 8. Так как параметр цикла увеличивается от 3 до 8 с шагом 1, то при выполнении программы тело цикла будет выполняться 6 раз (k будет равно 3, 4, 5, 6, 7, 8). Т. е. переменная s увеличится на 8 * 6 = 48. А так как начальное значение переменной s = 8 и после выполнения программы оно увеличится на 48, то в конечном итоге значение переменной s станет равным 56.

22 THEN m:= 0; m = m + 1 for k:= 1 to 11 do если Dat[k] 22 то m:= m + 1 END IF if Dat[k] 22 then NEXT k begin все m:= m + 1 кц PRINT m end; вывод m кон writeln(m) End. " width="640"

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

Ответ: ___________________________.

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

Бейсик

Паскаль

DIM Dat(11) AS INTEGER

DIM k,m AS INTEGER

Var k, m: integer;

целтаб Dat

Dat: array of integer;

Dat(1) = 20: Dat(2) = 25

цел k, m

Dat(3) = 19: Dat(4) = 25

Dat := 20; Dat := 25

Dat := 19; Dat := 25

Dat(5) = 26: Dat(6) = 22

Dat := 20; Dat := 25;

Dat(7) = 24: Dat(8) = 28

Dat := 26; Dat := 22

Dat := 19; Dat := 25;

Dat := 26; Dat := 22;

Dat(9) = 26: Dat(10) = 21

Dat := 24; Dat := 28

Dat(11) = 27

Dat := 24; Dat := 28;

Dat := 26; Dat := 21

Dat := 27

Dat := 26; Dat := 21;

FOR k = 1 TO 11

Dat := 27;

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

IF Dat(k) 22 THEN

m = m + 1

for k:= 1 to 11 do

если Dat[k] 22 то

m:= m + 1

if Dat[k] 22 then

m:= m + 1

вывод m

writeln(m)

), то его мы не учитываем, так как 22 не больше 22. Учитывать его можно было бы в том случае, если бы в сравнении стоял знак =. Итак, правильный ответ 7." width="640"

Решение:

• Рассмотрим программу пошагово. Итак, в самом начале объявляются переменные, которые будут использоваться (переменные k и m), а так же массив Dat, содержащий 11 элементов (от 1 до 11).
• Далее идет заполнение массива. Например, элементу массива с индексом 1 присваивается значение 20, элементу с индексом 2 - 25 и так далее. В итоге полученный массив можно представить в таком виде:
• Далее переменной 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. Учитывать его можно было бы в том случае, если бы в сравнении стоял знак =.

Итак, правильный ответ 7.

Тема: «Циклический алгоритм обработки массива чисел»

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

Var k, m, n: integer; Dat: array of integer; begin Dat := 7; Dat := 9; Dat := 10; Dat := 5; Dat := 6; Dat := 7; Dat := 9; Dat := 10; Dat := 6; Dat := 9; m:= 0; n:= 0; for k:= 1 to 10 do if Dat[k] >= m then begin m:= Dat[k]; n:= k end; writeln(n) end.

Данный пример взят из открытого банка заданий по информатике на сайте http://fipi.ru

РЕШЕНИЕ

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

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

Program – блок описания заголовка программы в Паскале имеет декоративное значение и может отсутствовать.

Const – блок описания констант. Может отсутствовать если константы в программе не предусмотрены.

Var — блок описания переменных с указанием их типа, например, тип integer означает целочисленные переменные.

Begin — end . – служебные слова, находящиеся в блоке операторов. Begin начинает исполняемую часть программы, а end. (точка в конце обязательна) – ее завершает.

Для примера напишем простую программу нахождения суммы двух чисел. Писать программу можно в программе PascalABC.NET , либо в онлайн-режиме, пройдя по этой ссылке .

Приступаем к решению задачи №10 ОГЭ по информатике. В программе используется одномерный массив из целых чисел от Dat до Dat. Структура программы выглядит так:

После входных данных начинается цикл с параметром for , в котором значения переменных m и n меняются.

For - это цикл, в котором тело выполняется заданное количество раз, поэтому его ещё называют циклом со счетчиком. В данной программе цикл должен выполниться от 1 до 10 раз.

В цикле содержится условный оператор if (если), который находит значение элемента массива больше, либо равного переменной m, а также его порядковый номер n. Значения m и n будут меняться, если условие истинно.

For k:= 1 to 10 do if Dat[k] >= m then begin m:= Dat[k]; n:= k end;

Выполним все 10 шагов цикла, а результаты будем заносить в таблицу:

Вместо Dat[k ] будем подставлять номер шага в цикле, например, для 1 шага запись будет выглядеть Dat[1 ], для 2 шага Dat[2 ] и.т.д.

1 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 1 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 1.

Подставляем значения: если 7 > = 0, тогда m:=7 и n:=1.

2 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 2 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 2.

Подставляем значения: Если 9 > = 7, тогда m:=9 и n:=2. Так, как условие истинно, то переменные m и n изменились, запишем в таблицу новые значения:

3 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 3 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 3.

Подставляем значения: Если 10 > = 9, тогда m:=10 и n:=3. Так, как условие истинно, то переменные m и n изменились, запишем в таблицу новые значения:

4 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 4 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 4.

Подставляем значения: Если 5 > = 10, тогда m:=5 и n:=4. Так, как условие ложно , то переменные m и n не изменились , На 4 шаге значения m и n остались прежние:

5 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 5 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 5.

Подставляем значения: Если 6 > = 10, тогда m:=6 и n:=5. Так, как условие ложно , то переменные m и n не изменились , На 5 шаге значения m и n остались прежние:

6 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 6 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 6.

Подставляем значения: Если 7 > = 10, тогда m:=7 и n:=6. Так, как условие ложно , то переменные m и n не изменились , На 6 шаге значения m и n остались прежние:

7 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 7 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 7.

Подставляем значения: Если 9 > = 10, тогда m:=9 и n:=7. Так, как условие ложно , то переменные m и n не изменились , На 7 шаге значения m и n остались прежние:

8 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 8 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 8.

Подставляем значения: Если 10 > = 10, тогда m:=10 и n:=8. Так, как условие истинно, то переменные m и n изменились, запишем в таблицу новые значения:

9 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 9 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 9.

Подставляем значения: Если 6 > = 10, тогда m:=10 и n:=9. Так, как условие ложно , то переменные m и n не изменились , На 9 шаге значения m и n остались прежние:

10 ШАГ

For k:= 1 to 10 do if Dat >= m then begin m:= Dat; n:= 10 end;

Данный алгоритм читается так: если значение Dat больше, либо равно значению в переменной m, тогда в переменную m присвоим значение, которое было в Dat , а в переменную n внесём порядковый номер массива,т.е. 10.

Задание 1:

Реферат, набранный на компьютере, содержит 48 страниц текста и помимо этого ещё 32 рисунка. На каждой текстовой странице 36 строк, в каждой строке 48 символов. Для кодирования символов используется кодировка КОИ-8, при которой каждый символ кодируется 8 битами. Определите информационный объём всего реферата, если информационный объем каждого рисунка составляет 2080 байт.

Решение:

В кодировке КОИ-8, 1 символ несет 1 байт (что равно = 8 бит) информации.

У нас известно, что всего 48 страниц текста + 32 рисунка. На каждой странице 36 строк, в каждой строке 48 символов.

Узнаем, сколько весит одна страница:

48 символов * 36 строк = на одной странице 1728 символов.

1728 символов на одной странице * 1 байт = одна страница весит 1728 байт.

48 всего страниц * на вес одной страницы 1728 байт = общий вес всех страниц текста 82944 байт.

Узнаем, сколько весят все рисунки в реферате:

По условию, 1 рисунок у нас весит 2080 байт. А всего их 32 рисунка.

2080 байт * 32 рисунка = 66560 байт.

Итого:

Общий вес всех страниц текста 82944 байт + вес рисунков 66560 байт = 149504 байт.

По умолчанию, 1 Килобайт (Кбайт) = 1024 байт.

149504 байт / 1024 байт = 146 Кбайт.

Ответ: 146 Кбайт

Задание 2:

Для какого из приведённых названий птиц истинно высказывание:

НЕ ((первая буква согласная) ИЛИ (последняя буква гласная))

1. Коршун
2. Чайка
3. Иволга

Конъюнкция (И) результат операции будет истинным тогда, когда оба исходных высказывания истинны.

Дизъюнкция (ИЛИ) результат операции будет ложным тогда, когда оба исходных высказывания ложны.

Инверсия (НЕ) каждому высказыванию ставит в соответствие новое высказывание, значение которого противоположно исходному.

Логические операции имеют следующий приоритет: инверсия -> конъюнкция -> дизъюнкция.

Решение:

Раскроем скобки:

Первая буква гласная И первая последняя буква согласная.

Ответ: Удод

Задание 4:

Пользователь работал с каталогом Тициан. Сначала он поднялся на один уровень вверх, затем спустился на один уровень вниз, потом ещё раз поднялся на один уровень вверх. В результате он оказался в каталоге:

С:\Искусство\Италия\Возрождение\Джорджоне

Запишите полный путь каталога, с которым пользователь начинал работу.

1. С:\Искусство\Италия\Возрождение\Художники\Тициан
2. С:\Искусство\Италия\Возрождение\Тициан
3. С:\Искусство\Италия\Возрождение\Тициан\Джорджоне
4. С:\Искусство\Италия\Возрождение\Джорджоне\Тициан

В условии указаны действия пользователя:

Сначала он поднялся на один уровень вверх, затем спустился на один уровень вниз, потом ещё раз поднялся на один уровень вверх.

Сделаем условия в обратном порядке:

Поднялся на один уровень вверх -> Спустился на один уровень вниз -> Поднялся на один уровень вверх.

За точку отправления берем каталог «Джорджоне»

С:\Искусство\Италия\Возрождение\Джорджоне

Если мы проделаем наше условие, то должны оказаться где-то выше каталога «Джорджоне».

С:\Искусство\Италия\Возрождение\Джорджоне\???

По предложенным ответам, нам только подходит 4ый вариант.

Ответ: С:\Искусство\Италия\Возрождение\Джорджоне\Тициан

Задание 5:

Какая формула может быть записана в ячейке D2, чтобы построенная после выполнения вычислений диаграмма по значениям диапазона ячеек A2:D2 соответствовала рисунку?

	A	B	C	D
1	4	3	2	1
2	=A1+C1	=C1	=A1-2	?

Варианты ответа:

1. = А1+2
2. = В1+1
3. = С1*2
4. = D1*2

Решение:

Из таблицы мы знаем: A1=4, B1=3, C1=2, D1=1.

Давайте заполним таблицу и найдем значение полей: A2, B2 и C2.

	A	B	C	D
1	4	3	2	1
2	6	2	2	?

Мы узнали: A2=6, B2=2, C2=2.

Теперь вернемся к нашей диаграмме и внимательно посмотрим на нее:

У нас одна большая часть и три маленьких.

Логически рассуждая, давайте представим одну большую часть как A2, которая ровна 6-и. А три маленькие равные части, это 6 деленное на 3, получается одна маленькая часть ровна 2-ум.

Из предложенных вариантов ответов, нам нужно что бы D2 было равно 2-ум.

Получается, что это четвертый ответ.

Ответ: 4

Задание 7:

Незнайка шифрует русские слова, записывая вместо каждой буквы её номер в алфавите (без пробелов).

Номера букв даны в таблице:

Некоторые шифровки можно расшифровать не одним способом.

Например, 12112 может означать «АБАК», может - «КАК», а может - «АБААБ».

Даны четыре шифровки:

1. 812029
2. 812030
3. 182029
4. 182030

Только одна из них расшифровывается единственным способом.

Найдите её и расшифруйте. То, что получилось, запишите в качестве ответа.

Решение:

Третий и четвертый вариант мы сразу исключаем. В начале шифровки стоит «18», это может быть как просто «1» так и «18».

Остаются первый и второй вариант шифровки.

Шифровка по условию начинается с 1 и заканчивается на 33. В первом варианте шифровки "29", может быть как "2" и "9", что нельзя сказать про второй вариант шифровки, которая заканчивается на "30". В шифровке "0" по условию нет и шифр "30" мы разделить ни как не можем.

Ответ: ЖАТЬ

Задание 10:

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

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

алг
нач
целтаб Dat
цел k, m
Dat := 45; Dat : = 55
Dat := 40; Dat : = 15
Dat := 20; Dat := 80
Dat := 35; Dat : = 70
Dat := 10; Dat := 45
m:= Dat
нц для к от 4 до 10
если Dat[к] >= Dat то
m:= m + Dat [к]
все
кц
вывод m
кон

Бейсик:

DIM Dat(10) AS INTEGER
Dat(1)= 45: Dat(2)= 55
Dat(3)= 40: Dat(4)= 15
Dat(5)= 20: Dat(6)= 80
Dat(7)= 35: Dat(8)= 70
Dat(9)= 10: Dat(10)= 45
m = Dat (1)
FOR k = 4 TO 10
IF Dat(k) >= Dat (1)
THEN
m = m + Dat (k)
END IF
10
10
ID_650 4/8 neznaika.pro
NEXT k
PRINT m
END

Паскаль:

var k, m: integer;
Dat: array
of integer;
begin
Dat := 45; Dat := 55;
Dat := 40; Dat := 15;
Dat := 20; Dat := 80;
Dat := 35; Dat := 70;
Dat := 10; Dat := 45;
m:= Dat;
for k:= 4 to 10 do begin
if Dat[k] >= Dat then
begin
m:= m + Dat[k]
end
end;
write(m);
end.

Давайте решим задачу на примере языка Паскаль.

var k, m: integer; Dat: array of integer; begin Dat := 45; Dat := 55; Dat := 40; Dat := 15; Dat := 20;. Dat := 80; Dat := 35; Dat := 70; Dat := 10; Dat := 45; m:= Dat; for k:= 4 to 10 do begin if Dat[k] >= Dat then begin m:= m + Dat[k] end end; write(m); end.

Сначала у нас вводятся целые числовые переменные k и m. Дана таблица с 1 до 10 значений - десять проданных типов товаров. Переменная m равна первому типу товаров (Dat := 45;). Если одно из значений с 4-го по 10-ый тип будет больше или равно 1-ого типа, который равен 45, то большее значение добавляется к переменной m. Которая в свою очередь у нас по условию, переменная m равна 45. Получается, что у нас типы товаров: Dat и Dat больше значения Dat := 45, а тип Dat равен Dat := 45. В итоге получаем: 45 + Dat + Dat + Dat = 45 + 80 + 70 + 45 = 240

Ответ: Будет напечатано 240

Представляю решение 10 задания ОГЭ-2016 по информатике из проекта демоверсии. По сравнению с демоверсией 2015 года, 10 задание не изменилось. Это задание на умение исполнить циклический алгоритм обработки массива чисел, записанный на алгоритмическом языке (Алгоритм, свойства алгоритмов, способы записи алгоритмов. Блок-схемы. Представление о программировании. Алгоритмические конструкции). Это задание повышенного уровня сложности, ответом к нему является целое число, которое нужно записать в поле ответа.

Скриншот 10 задания.

Задание:

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

Пример на языке Паскаль

Var k, m: integer;
Dat: array of integer;
Begin
Dat := 16; Dat := 20;
Dat := 20; Dat := 41;
Dat := 14; Dat := 21;
Dat := 28; Dat := 12;
Dat := 15; Dat := 35;
m:= 0;
for k:= 1 to 10 do
if Dat[k]>m then
begin
m:= Dat[k]
end;
writeln(m);
End.

В данной программе создан массив из 10 чисел. В цикле от 1 до 10 включительно значение элемента массива сравнивается со значением переменной m. Если оказывается, что значение элемента массива строго больше значения переменной m, то переменной m присваивается значение элемента массива (изначально, до цикла значение переменной m было равно 0).

Перефразируя, получаем следующее. Для каждого исполнителя народных песен с 1 по 10 включительно количество голосов сравнивается со значением m. Если количество голосов больше m, то переменной m присваиваем значение равное количеству голосов. В результате выполнения цикла получаем число m, которое показывает наибольшее количество голосов отданное одному из участников, т.е. m=41.

В таблице Dat представлены данные о количестве голосов, поданных за 10 исполнителей народных песен (Dat - количество голосов, поданных за первого исполнителя; Dat - за второго и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования. Алгоритмический язык Бейсик Паскаль алг нач целтаб Dat цел k, m Dat := 16 Dat := 20 Dat := 20 Dat := 41 Dat := 14 Dat := 21 Dat := 28 Dat := 12 Dat := 15 Dat := 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 of integer; Begin Dat := 16; Dat := 20; Dat := 20; Dat := 41; Dat := 14; Dat := 21; Dat := 28; Dat := 12; Dat := 15; Dat := 35; m:= 0; for k:= 1 to 10 do if Dat[k]gt;m then begin m:= Dat[k] end; writeln(m); End.

Похожие вопросы

• Заполни пропуски. Помогите пожалуйста:)
• Герой освободившый прометея
• Составь задачу,реши задачу и запиши решение
• Ребят,помогите:(lg(x+√3)+lg(x-√3)=0
• Помогите еще решить пожалуйста. Вычисли площадь треугольника, если она в 9раз меньше, чем площадь квадрата с длиной стороны 12см
• Решите уравнение (8 5/27 - x) - 2 25/27 = 1 25/27
• Как назывались крестьяне, которых продавали
• Стала девочка котенка кормить. Принесла овсяной кашки,отвернулся он от чашки. При??есла ему редиски, отвернулся он от миски. Принесла кусочек сала, говорит котенок мало. Найдите в тексте слова с орфограммой "безударный гласный...