В таблице дат представлены данные. Что нужно знать для выполнения задания. В условии указаны действия пользователя
В таблице 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] больше 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) больше 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] больше m then begin m:= Dat[k] end; writeln(m); End.
Похожие вопросы
- Ребят,помогите:(lg(x+√3)+lg(x-√3)=0
- Стала девочка котенка кормить. Принесла овсяной кашки,отвернулся он от чашки. Принесла ему редиски, отвернулся он от миски. Принесла кусочек сала, говорит котенок мало. Найдите в тексте слова с орфограммой "безударный гласный в...
- . Что больше: 26% учащихся школы или учащихся этой школы? А. 26% учащихся Б. учащихся В. Эти числа равны Г. Данных для ответа недостаточно
- Помогите правильно перевести письмо выдуманному другу. Дорогая Нелли, Привет помнишь я хотела тебе рассказать о моём селе? У нас в селе прекрасная природа. Она особо хороша летом. Я не могу с точностью описать нашу сельскую п...
- 1) карбонат кальция --> оксид кальция + углекислый газ 2) сульфат меди (II) + гидроксид натрия --> …… 3) соляная кислота + железа --> …… 4) оксид лития + вода --> гидроксид лития. Укажите типы реакций, запишите одно из...
- В первом бассейне было 1 600 кубических метров воды,во 2 бассейне 1215 квадратных метров воды.Чтобы вычистить 1 бассейн,из него надо вы качать насосом 65 кубических метра воды в час.Чтобы заполнить 2 бассейн,в него надо залить...
- За 5 тетрадей заплатили n коп., а за 11 блокнотов - на m коп. больше. На сколько копеек блокнот дешевле тетради? Надо составить БУКВЕННОЕ ВЫРАЖЕНИЕ и найти его значение при n=1000, m=320.
Обработка информации:
- Алгоритм, свойства алгоритмов, способы записи алгоритмов. Блок-схемы. Представление о программировании.
- Алгоритмические конструкции.
Это темы для которых создаются проверочные задания №10 основного государственного экзамена (ОГЭ) по информатике.
10 (В) (часть 1, повышенный уровень - задание подразумевает самостоятельное формулирование и запись экзаменуемым ответа в виде последовательности символов, время выполнения - 6 мин, максимальный балл за выполнение задания - 1). Требования к уровню подготовки, освоение которых проверяется в ходе экзамена при ответе на данное задание: оценивать числовые параметры информационных объектов и процессов, умение исполнить циклический алгоритм обработки массива чисел на одном из языков программирования.
Что нужно знать для выполнения задания:
- массив - это набор (поименованная совокупность) однотипных элементов, упорядоченных по индексам, определяющим положение элемента в массиве;
- перед использованием в программе массив должен быть описан, т.е. должно быть указано имя, количество элементов массива и их тип;
var <имя_массива>: array [<мин_знач_индекса>. . <макс_знач_индекса> ] of <тип_элементов>;
Например: запись
var А: array of integer;
означает, что дан массив с именем А, состоящий из 10 целых элементов.
- заполнить массив можно вводя значение каждого элемента с клавиатуры, либо присваивая элементам некоторые значения:
- для обращения к элементу массива используют квадратные скобки, запись A[i] обозначает элемент массива A с номером (индексом) i;
- матрица (двухмерный массив) - это прямоугольная таблица однотипных элементов;
- если матрица имеет имя A, то обращение A обозначает элемент, расположенный на пересечении строки i и столбца k.
Пример решения задачи:
В таблице Dat хранятся данные о численности учеников в классах (Dat - число учеников в первом классе, Dat - во втором и т. д.). Определите, какое число будет напечатано в результате работы следующей программы. Текст программы приведён на трёх языках программирования.
Алгоритмический язык | Бейсик | Паскаль |
алг |
DIM Dat(11) AS INTEGER |
Var k, m: integer; Dat: array of integer; Begin Dat := 20; Dat := 25; Dat := 19; Dat := 25; Dat := 26; Dat := 22; Dat := 24; Dat := 28; Dat := 26; Dat := 21; Dat > 22 then begin m:= m + 1 end; writeln(m) End. |
Решение (1 способ):
- Рассмотрим программу пошагово. Вначале объявляются переменные, которые будут использоваться (переменные k и m), а так же массив Dat, содержащий 11 элементов (элементы пронумерованы от 1 до 11).
ВНИМАНИЕ: В массиве Dat, который описан на языке Basic будет 12 элементов, так как нумерация начинается не с первого элемента, а с нулевого.
- Далее идет заполнение массива. Например, элементу массива с индексом 1 присваивается значение 20, элементу с индексом 2 — 25 и т. д. В итоге полученный массив можно представить в таком виде:
Массив Dat
Индекс |
|||||||||||
Значение |
- переменной 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. Но т.к. сравнение у нас строгое (знак «>»), то его мы не учитываем.
Ответ: 7
Решение (2 способ — ручная прокрутка):
Мысленно представляем полученный массив:
Массив Dat
Индекс |
|||||||||||
Значение |
k | Dat[k] (для Бейсик Dat(k)) | Проверка условия Dat[k] > 22 (для Бейсик Dat(k) > 22) | m |
0 | |||
1 | 20 | нет | |
2 | 25 | да | 1 |
3 | 19 | нет | |
4 | 25 | да | 2 |
5 | 26 | да | 3 |
6 | 22 | нет | |
7 | 24 | да | 4 |
В таблице 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
- Как назывались крестьяне, которых продавали
- Стала девочка котенка кормить. Принесла овсяной кашки,отвернулся он от чашки. При??есла ему редиски, отвернулся он от миски. Принесла кусочек сала, говорит котенок мало. Найдите в тексте слова с орфограммой "безударный гласный...
Доступный и понятный материал для изучения задании 9 и 10 ОГЭ по Информатике + задания для отработки
Просмотр содержимого документа
Алгоритмический язык | ||
алг | DIM k, s AS INTEGER | Var s,k: integer; |
Решение :
Как видим, в теле цикла только одна команда 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.