Ученики на Учителя.com


Презентация "Исполнение циклического алгоритма обработки массива чисел"

Скачать материал
Подписи к слайдам:
  • Исполнение
  • циклического алгоритма
  • обработки массива чисел
  • Задачи
  • с
  • пояснениями решений
  • Работу выполнила Поспелова Г. В.,
  • учитель информатики МБОУ «СОШ №20»
  • г. Новомосковск
  • 2018 год
  • Теоретические сведения
  • Массив – это упорядоченное множество однотипных величин (элементов массива), которым присваивается одно общее имя. Элементы массива различаются номерами – индексами.
  • Перед использованием в программе массив должен быть описан, то есть должно быть указано имя массива, количество элементов массива и их тип.
  • Dat: array [1..10] of integer;
  • Суммирование элементов массива осуществляется за счёт поочерёдного добавления слагаемых.
  • Решение задач
  • Ответ: 9
  • В таблице Dat хранятся положительные и отрицательные целые числа.
  • Определите, что будет напечатано в результате выполнения программы:
  • k
  • m
  • num
  • Dat [k]*m<0
  • 7
  • 1
  • 2
  • -8 * 7 < 0
  • да
  • 3
  • -8
  • 2
  • 3 * -8 < 0
  • да
  • 4
  • 3
  • 3
  • 6 * 3 < 0
  • нет
  • 5
  • 3
  • 3
  • -4 * 3 < 0
  • да
  • 6
  • -4
  • 5
  • 3 * -4 < 0
  • да
  • 7
  • 3
  • 6
  • 5 * 3 < 0
  • нет
  • 8
  • 3
  • 6
  • -5 * 3 < 0
  • да
  • 9
  • -5
  • 8
  • 7 * -5 < 0
  • да
  • 10
  • 7
  • 9
  • 1 * 7 < 0
  • нет
  • Задача 1
  • Пояснение:
  • var k, m, num: integer;
  • Dat: array [1..10] of integer;
  • begin
  • Dat [1] :=7; Dat [2] := -8;
  • Dat [3] :=3; Dat [4] := 6;
  • Dat [5] := -4; Dat [6] := 3;
  • Dat [7] :=5; Dat [8] := -5;
  • Dat [9] :=7; Dat [10] := 1;
  • num :=1; m :=Dat [1];
  • for k :=2 to 10 do begin
  • if Dat [k]*m<0 then
  • begin
  • m :=Dat [k]; num :=k;
  • end;
  • end;
  • write (num);
  • end.
  • num :=1; m :=Dat [1] = 7
  • k
  • Dat [k]*m<0
  • m=Dat [k]
  • num=k
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • Ответ: 3
  • В таблице Dat хранятся положительные и отрицательные целые числа. Определите, что будет напечатано в результате выполнения программы:
  • -8 * -7 < 0
  • нет
  • -7
  • 1
  • 3 * -7 < 0
  • да
  • 3
  • 3
  • 6 * 3 < 0
  • нет
  • -4
  • 5
  • -4 * 3 < 0
  • да
  • 3
  • 6
  • 3
  • 3
  • 3 * -4 < 0
  • да
  • 3
  • 6
  • 5 * 3 < 0
  • нет
  • 3
  • 6
  • 5 * 3 < 0
  • нет
  • 7 * 3 < 0
  • нет
  • 3
  • 6
  • 1 * 3 < 0
  • нет
  • 3
  • 6
  • Задача 2
  • var k, m, num: integer;
  • Dat: array [1..10] of integer;
  • begin
  • Dat [1] := -7; Dat [2] := -8;
  • Dat [3] := 3; Dat [4] := 6;
  • Dat [5] := -4; Dat [6] := 3;
  • Dat [7] := 5; Dat [8] := 5;
  • Dat [9] := 7; Dat [10] := 1;
  • num :=1; m :=Dat [1];
  • for k :=2 to 10 do begin
  • if Dat [k] * m < 0 then
  • begin
  • m :=Dat [k]; num :=k;
  • end;
  • end;
  • write (m);
  • end.
  • Пояснение:
  • num = 1; m = Dat [1] = -7
  • k
  • Dat [k] > m
  • m = Dat [k]
  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • Ответ: 41
  • В таблице Dat хранятся положительные и отрицательные целые числа. Определите, что будет напечатано в результате выполнения программы:
  • 20 > 16
  • да
  • 20
  • 20 > 20
  • нет
  • 41
  • 41 > 20
  • да
  • 41
  • 14 > 41
  • нет
  • 41
  • 20
  • 21 > 41
  • нет
  • 41
  • 28 > 41
  • нет
  • 41
  • 12 > 41
  • нет
  • 15 > 41
  • нет
  • 41
  • 35 > 41
  • нет
  • 41
  • Задача 3
  • var k, m : integer;
  • Dat: array [1..10] of integer;
  • begin
  • 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 do
  • if Dat [k] >m then
  • begin
  • m :=Dat [k];
  • end;
  • write (m);
  • end.
  • Пояснение:
  • 16 > 0
  • да
  • 16
  • m = 0
  • k
  • Dat [k] < m
  • m=Dat [k]
  • day=k
  • 7
  • 1
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • Ответ: 2
  • В таблице Dat хранятся положительные и отрицательные целые числа. Определите, что будет напечатано в результате выполнения программы:
  • 1 < 7
  • да
  • 1
  • 2
  • 3 < 1
  • нет
  • 1
  • 2
  • 3 < 1
  • нет
  • 1
  • 2
  • 2 < 1
  • нет
  • 1
  • 2
  • 1
  • 2
  • 2 < 1
  • нет
  • 1
  • 2
  • 5 < 1
  • нет
  • 1
  • 2
  • 5 < 1
  • нет
  • 7 < 1
  • нет
  • 1
  • 2
  • 1 < 1
  • нет
  • 1
  • 2
  • Задача 4
  • var k, m, day: integer;
  • Dat: array [1..10] of integer;
  • begin
  • Dat [1] := 7; Dat [2] := 1;
  • Dat [3] := 3; Dat [4] := 3;
  • Dat [5] := 2; Dat [6] := 2;
  • Dat [7] := 5; Dat [8] := 5;
  • Dat [9] := 7; Dat [10] := 1;
  • day :=1; m :=Dat [1];
  • for k :=2 to 10 do begin
  • if Dat [k] < m then
  • begin
  • m :=Dat [k]; day :=k;
  • end;
  • end;
  • write (day);
  • end.
  • Пояснение:
  • day :=1; m :=Dat [1] = 7;
  • k
  • Dat [k] < Dat [1]
  • m= m+Dat [k]
  • 2
  • 3
  • 4
  • 5
  • 6
  • 7
  • 8
  • 9
  • 10
  • Ответ: 165
  • В таблице Dat хранятся положительные и отрицательные целые числа. Определите, что будет напечатано в результате выполнения программы:
  • 55 < 45
  • нет
  • 45
  • 40 < 45
  • да
  • 85+15=100
  • 15 < 45
  • да
  • 100+20=120
  • 20 < 45
  • да
  • 120
  • 45+40+85
  • 80 < 45
  • нет
  • 120+35=155
  • 35 < 45
  • да
  • 155
  • 70 < 45
  • нет
  • 10 < 45
  • да
  • 155+10=165
  • 45 < 45
  • нет
  • 165
  • Задача 5
  • var k, m: integer;
  • Dat: array [1..10] of integer;
  • begin
  • 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 :=2 to 10 do begin
  • if Dat [k] < Dat [1] then
  • begin
  • m := m + Dat [k];
  • end;
  • end;
  • write (m);
  • end.
  • Пояснение:
  • m = Dat [1] = 45
  • Источники информации
  • ОГЭ. Информатика и ИКТ: типовые экзаменационные варианты: 10 вариантов / С.С Крылов, Т.Е. Чуркина - М.: Издательство «Национальное образование», 2017. – 144 с. – (ОГЭ. ФИПИ – школе).
  •  Материалы сайта distan-school.ru

Информатика - еще материалы к урокам: