Что такое findslide.org?

FindSlide.org - это сайт презентаций, докладов, шаблонов в формате PowerPoint.


Для правообладателей

Обратная связь

Email: Нажмите что бы посмотреть 

Яндекс.Метрика

Презентация на тему Подготовка к ЕГЭ. Задание №27

10 20 50 25 45 10 40 0С клавиатуры вводятся последовательность целых чисел.Число 0 – окончание ввода.Слева – пример такой последовательности.
ПОДГОТОВКА К ЕГЭЗадания №27 10 20 50 25 45 10 40 0С клавиатуры вводятся последовательность целых 10 20 50 25 45 10 40 0Найти максимальное из введенных чисел 10 20 50 25 45 10 40 0Найти второй по значению максимум 10 20 50 25 45 10 40 0 readln (x); max:=x; max2:=x; 10 20 50 25 45 10 40 0Найти третий по значению максимум 10 20 50 25 45 10 40 0Найти N максимальных по значению 10 20 50 25 45 10 40 0 readln (x); … //инициализация 10 20 50 25 45 10 40 0Найти наибольшую сумму двух чисел последовательности. 10 20 50 25 45 10 40 0Найти сумму двух наибольших четных чисел в последовательности. 10 20 50 25 45 10 40 0Найти наибольшее число R, для 10 20 50 25 45 10 40 0Найти наибольшую сумму двух чисел, 10 20 50 25 45 10 40 0 readln (x3, x2,x1,x); …//инициализация 10 20 50 25 45 10 40 0Найти наибольшую сумму двух чисел, 10 20 50 25 45 10 40 0 for var i:=1 to
Слайды презентации

Слайд 2 10 20 50 25 45 10 40 0

С клавиатуры вводятся последовательность целых чисел.
Число 0 –

10 20 50 25 45 10 40 0С клавиатуры вводятся последовательность

окончание ввода.
Слева – пример такой последовательности.


Слайд 3 10 20 50 25 45 10 40 0


Найти максимальное из введенных чисел и его порядковый

10 20 50 25 45 10 40 0Найти максимальное из введенных

номер в последовательности.
Как можно просто, но эпично ошибиться?





Слайд 4 10 20 50 25 45 10 40 0


Найти второй по значению максимум в последовательности.
Найти его

10 20 50 25 45 10 40 0Найти второй по значению

порядковый номер.


Слайд 5 10 20 50 25 45 10 40 0
readln (x);
max:=x; max2:=x;
while x0 do

10 20 50 25 45 10 40 0 readln (x); max:=x;

begin
if x>max then
begin
max2:=max;

max:=x;
end
else
if x>max2 then max2:=x;
Readln (x)
end;

Слайд 6 10 20 50 25 45 10 40 0


Найти третий по значению максимум в последовательности.
Найти его

10 20 50 25 45 10 40 0Найти третий по значению

порядковый номер.


Слайд 7 10 20 50 25 45 10 40 0


Найти N максимальных по значению элементов последовательности.
Найти их

10 20 50 25 45 10 40 0Найти N максимальных по

порядковые номеры.


Слайд 8 10 20 50 25 45 10 40 0
readln (x);
… //инициализация массива М?
while

10 20 50 25 45 10 40 0 readln (x); …

x0 do
begin
i:=1;;
while (i

if x>M[i] then break;
i:=i+1;
end;

if i<=N then begin
for var j:=N downto i+1 do
M[j]:=M[j-1];

m[i]:=x;
end;
readln(x);
end;

Слайд 9 10 20 50 25 45 10 40 0



Найти наибольшую сумму двух чисел последовательности.

10 20 50 25 45 10 40 0Найти наибольшую сумму двух чисел последовательности.

Слайд 10 10 20 50 25 45 10 40 0



Найти сумму двух наибольших четных чисел в последовательности.

10 20 50 25 45 10 40 0Найти сумму двух наибольших четных чисел в последовательности.

Слайд 11 10 20 50 25 45 10 40 0

Найти наибольшее число R, для которого одновременно выполняются

10 20 50 25 45 10 40 0Найти наибольшее число R,

следующие условия:
R-четное;
R-сумма двух чисел последовательности.


Слайд 12 10 20 50 25 45 10 40 0


Найти наибольшую сумму двух чисел, которые «находятся» друг

10 20 50 25 45 10 40 0Найти наибольшую сумму двух

от друга в последовательности не менее чем через два

числа подряд.


Слайд 13 10 20 50 25 45 10 40 0
readln (x3, x2,x1,x);
…//инициализация мах
while x0

10 20 50 25 45 10 40 0 readln (x3, x2,x1,x);

do
begin
if x3>Max3 then

Max3 := x3;

if x+Max3>Max then
Max:=x+Max3;

x3:=x2; x2:=x1; x1:=x;
readln(x);
end;

Слайд 14 10 20 50 25 45 10 40 0


Найти наибольшую сумму двух чисел, которые «находятся» друг

10 20 50 25 45 10 40 0Найти наибольшую сумму двух

от друга в последовательности не менее чем через N

числел подряд.


  • Имя файла: podgotovka-k-ege-zadanie-n27.pptx
  • Количество просмотров: 159
  • Количество скачиваний: 0