
Археология об основании Рима: Новые раскопки проясняют и такой острый дискуссионный вопрос, как дата самого возникновения Рима...
Биохимия спиртового брожения: Основу технологии получения пива составляет спиртовое брожение, - при котором сахар превращается...
Топ:
Отражение на счетах бухгалтерского учета процесса приобретения: Процесс заготовления представляет систему экономических событий, включающих приобретение организацией у поставщиков сырья...
История развития методов оптимизации: теорема Куна-Таккера, метод Лагранжа, роль выпуклости в оптимизации...
Комплексной системы оценки состояния охраны труда на производственном объекте (КСОТ-П): Цели и задачи Комплексной системы оценки состояния охраны труда и определению факторов рисков по охране труда...
Интересное:
Как мы говорим и как мы слушаем: общение можно сравнить с огромным зонтиком, под которым скрыто все...
Финансовый рынок и его значение в управлении денежными потоками на современном этапе: любому предприятию для расширения производства и увеличения прибыли нужны...
Распространение рака на другие отдаленные от желудка органы: Характерных симптомов рака желудка не существует. Выраженные симптомы появляются, когда опухоль...
Дисциплины:
![]() |
![]() |
5.00
из
|
Заказать работу |
Содержание книги
Поиск на нашем сайте
|
|
Пример 3. m:= 0; for k:= 1 to 10 do if Dat[k] > 6 then m:= m + 1; writeln(m) | 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; Находит КОЛИЧЕСТВО элементов массива больших шести=1+1+1+1+1+1+1=7 |
Пример 4. m:= 0; for k:= 1 to 11 do if Dat[k] < 25 then begin m:= m + 1 end; writeln(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; Находит КОЛИЧЕСТВО элементов массива меньших двадцати пяти=1+1+1+1+1=5 |
Найти максимальный или минимальный элемент массива.
m:= 30; for k:= 1 to 11 do if Dat[k] < m then begin m:= Dat[k] end; writeln(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; Находит МИНИМАЛЬНЫЙ элемент массива = 19 |
m:= 0; for k:= 1 to 11 do if Dat[k] > m then begin m:= Dat[k] end; writeln(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; Выводит значение максимального элемента массива=28 |
4. Найти номер первого (>,<) или последнего(>=, <= если их несколько - одинаковых) максимального или минимального элемента массива
m:= 10; n:= 0; for k:= 1 to 10 do if Dat[k] <m then begin m:= Dat[k]; n:= k end; writeln(n) | 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; Выводит номер первого (<) минимального элемента массива=5, причем 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) | Dat[1]:= 7; Dat[2]:= 9; Dat[3]:= 10; Dat[4]:= 5; Dat[5]:= 6; Dat[6]:= 7; Dat[7]:= 9; Dat[8]:= 10; Dat[9]:= 6; Dat[10]:= 9; Выводит номер – n, последнего (>=)максимального элемента массива=8 |
Найти сумму элементов массива не больших или не меньших определенного порядкового номера элемента массива.
m:= 0; for k:= 1 to 11 do if k > 9 then begin m:= m + Dat[k] end; writeln(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; Находит СУММУ элементов массива с номером больших девяти =21+27=48 |
m:= 0; for k:= 1 to 11 do if k< 5 then begin m:= m + Dat[k] end; writeln(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; Выводит сумму элементов с номером меньших пяти=20+25+19+25=89 |
3+2+2=7 |
Ответ: 7
Пример: 2. Сколько существует различных путей из города А в город Л?
Из А в Л город существует 9+6+3+2=20 дорог
Ответ: 20
Умение осуществлять поиск в готовой базе данных по сформулированному условию
Как и во втором задании, можно применять принцип вентилей (кранов), для логических операций «И» и «ИЛИ»
А |
B |
И |
А |
B |
ИЛИ |
Помните что запись, это вся строка базы данных
Пример 1.
Ниже в табличной форме представлен фрагмент базы данных
«Крупнейшие озёра мира».
| Площадь (тыс. км2) | Мах глубина (м) | Материк | ||||
Байкал | 31,5 | Евразия | |||||
Больш. Невольничье | 28,6 | Северная Америка | |||||
Гурон | 59,6 | Северная Америка | |||||
Гэрднер | 7,7 | Австралия | |||||
Женевское | 0,5 | Евразия | |||||
Маракайбо | 16,3 | Южная Америка | |||||
Мёртвое море | 1,0 | Евразия | |||||
Онежское | 9,6 | Евразия | |||||
Онтарио | 19,5 | Северная Америка | |||||
Рудольф | 8,6 | Африка | |||||
Танганьика | 32,9 | Африка | |||||
Чудское | 3,5 | Евразия |
Сколько записей в данном фрагменте удовлетворяют условию
(Материк = «Африка») ИЛИ (Площадь (тыс. км2) > 30)?
В ответе укажите одно число – искомое количество записей.
Решение
Выделим цветом в таблице удовлетворяющие условию, галочками поставим удовлетворяющие обоим условиям, получаем 4 записи.
Обратите внимание, что в таблице выделено, пять подходящий условий, а почему ответ четыре? Потому что на два выделенных условия приходиться одна запись (строка) базы данных:
Танганьика | 32,9 | Африка |
Ответ: 4
Пример 2.
Ниже в табличной форме представлен фрагмент базы данных о погоде.
Дата | Температура | Давление | Ветер | Осадки |
01.05.2010 | нет | |||
02.05.2010 | нет | |||
03.05.2010 | нет | |||
04.05.2010 | дождь | |||
05.05.2010 | дождь | |||
06.05.2010 | дождь | |||
07.05.2010 | нет | |||
08.05.2010 | нет |
Сколько записей в данном фрагменте удовлетворяют условию
(Осадки = «нет») И (Ветер (м/с) >= 9) И (Давление (мм рт. ст.) > 749)?
В ответе укажите одно число – искомое количество записей.
|
|
История создания датчика движения: Первый прибор для обнаружения движения был изобретен немецким физиком Генрихом Герцем...
Состав сооружений: решетки и песколовки: Решетки – это первое устройство в схеме очистных сооружений. Они представляют...
Археология об основании Рима: Новые раскопки проясняют и такой острый дискуссионный вопрос, как дата самого возникновения Рима...
Историки об Елизавете Петровне: Елизавета попала между двумя встречными культурными течениями, воспитывалась среди новых европейских веяний и преданий...
© cyberpedia.su 2017-2025 - Не является автором материалов. Исключительное право сохранено за автором текста.
Если вы не хотите, чтобы данный материал был у нас на сайте, перейдите по ссылке: Нарушение авторских прав. Мы поможем в написании вашей работы!