Задачи ЕГЭ С2. Демо 2006 С2 Опишите на русском языке или на одном из языков программирования алгоритм поиска второго по величине (т.е. следующего по величине.

Презентация:



Advertisements
Похожие презентации
Дан целочисленный массив из 30 элементов. Элементы массива могут принимать целые значения от 0 до 100 – баллы учащихся выпускного класса за итоговый тест.
Advertisements

1 Программирование на языке Паскаль Тема 2. Максимальный элемент массива.
Например: семейство бабочек; Понятие одномерного массива поле цветов;
Тема: «Понятие квадратная матрица» :17:47.
Власова О.А. СОШ 5, Елабуга. Например: семейство бабочек ; Понятие одномерного массива поле цветов;
Program maxsimum; const n=10; var a:array [1..n] of integer; max,i:integer;begin ВВОД ЭЛЕМЕНТОВ МАССИВА; max:=a[1]; for i:=2 to n do if a[i]> max then.
A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5] Двумерный массив можно представить.
Шутилина Л.А., A[1,1]A[1,2]A[1,3]A[1,4]A[1,5] A[2,1]A[2,2]A[2,3]A[2,4]A[2,5] A[3,1]A[3,2]A[3,3]A[3,4]A[3,5] A[4,1]A[4,2]A[4,3]A[4,4]A[4,5]
К. Поляков, Программирование на языке Паскаль Часть II Тема: Поиск максимального элемента массива.
1 Программирование на языке Паскаль Максимальный элемент массива.
Задания части А Задания части С. 1. Значения двух массивов A[1..100] и B[1..100] задаются с помощью следующего фрагмента программы. Сколько элементов.
Проверка пройденного материала. Исправьте ошибки в решении задачи: заполнить и вывести массив W(3) вещественных чисел Program Mass; Var b:Array[1..10]
При решении многих задач приходится обрабатывать большое количество однотипных данных. Для хранения этих данных пришлось бы вводить большое количество.
Решение задач с использованием массивов
Язык программирования Паскаль 9 часть. Массивы.
ГОТОВИМСЯ К ЕГЭ по информатике /алгоритмизация и программирование/
PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.
Массивы Вариант 1 Program upr1; Var s,a:real; I: integer; Begin S:=0; For I:=1 to 10 do Begin Writeln (введите очередное число'); Readln(a); S: =s+a; End;
- это структура данных, представляющая собой упорядоченную совокупность значений одного типа.
Записи 1.Повторение структуры данных МАССИВ 2.Определение структуры данных ЗАПИСЬ 3.Описание типа данных ЗАПИСЬ в Pascal 4.Решение задачи с использованием.
Транксрипт:

Задачи ЕГЭ С2

Демо 2006 С2 Опишите на русском языке или на одном из языков программирования алгоритм поиска второго по величине (т.е. следующего по величине за максимальным) элемента в числовом массиве из 30 различных элементов.

С2

ЕГЭ 2009 Дан целочисленный массив из 30 элементов со значениями от 150 до 200, обозначающими рост учащихся. В автомобильную команду входят только те ученики, чей рост не превышает 175 см. Известно, что такие учащиеся точно есть. Вывести рост самого высокого ученика в команде.

Дан шаблон ввода массива. При решении можно использовать только те переменные, которые описаны в разделе описаний. Program c2; Const n=30; Var a:array[1..n] of byte; Max, i, j: integer; Begin For i :=1 to n do readln(a[i]);...

Указания к решению: MAX:=150; For i:=1 to 30 do If (a[i]>max) and (a[i]

ЕГЭ 2009 Дан целочисленный массив из 30 элементов со значениями от 150 до 200, обозначающими рост учащихся. В баскетбольную команду входят только те ученики, чей рост не меньше 180 см. Известно, что такие учащиеся точно есть. Вывести рост самого низкого ученика в команде.

Тренировочный 2009

Демо 2007 С2 Опишите на русском языке или одном из языков программирования алгоритм поиска номера первого из двух последовательных элементов в целочисленном массиве из 30 элементов, сумма которых максимальна (если таких пар несколько, то можно выбрать любую из них).

const N=30; var a:array[1..N] of integer; MaxSum, MaxNum, i: integer; begin MaxNum:=1; MaxSum:=a[1]+a[2]; for i:=2 to N-1 do begin if a[i]+a[i+1]>MaxSum then begin MaxNum:=i; MaxSum:=a[i]+a[i+1]; end end; writeln(MaxNum); end. Решение С2 Демо 2007

Демо 2008