Одномерные массивы целых чисел. описание,заполнение, вывод массива

9 класс

ОДНОМЕРНЫЕ МАССИВЫ ЦЕЛЫХ ЧИСЕЛ. ОПИСАНИЕ,ЗАПОЛНЕНИЕ, ВЫВОД МАССИВА

Цель урока: иметь представление о одномерном массиве, разрабатывать программы для обработки одномерного массива.

Хо работы.

1. Организационный момент.

2. Проверка домашнего задания.

3. Основная часть урока.

Урок проводить при помощи презентации «Одномерные массивы целых чисел».

Массив - это поименованная совокупность однотипных элементов, упорядоченных по индексам, определяющим положение элемента в массиве.

Решение разнообразных задач, связанных с обработкой массивов, базируется на решении таких типовых задач, как:

- суммирование элементов массива;

- поиск элемента с заданными свойствами;

- сортировка массива.

Описание массива

function (): ;

begin

;

имя_функции := результат

end;

var a: array [1..10] of integer;

const b: array [1..5] of integer = (4, 2, 3, 5, 7);

Массив b с постоянными значениями описан в разделе описания констант.

Способы заполнения массива

1 способ. Ввод каждого значения с клавиатуры:

for i:=1 to 10 do read (a[i]);

2 способ. С помощью оператора присваивания (по формуле):

for i:=1 to 10 do a[i]:=i;

3 способ. С помощью оператора присваивания (случайными числами):

randomize;

for i:=1 to 10 do a[i]:=random(100);

Вывод массива

1 способ. Элементы массива можно вывести в строку, разделив их пробелом:

for i:=1 to 10 do write (a[i], ' ');

2 способ. Вывод с комментариями:

for i:=1 to 10 do writeln ('a[', i, ']=', a[i]);

Объявление массива

program  n_1 ;
var i: integer;

Заполнение массива

Вывод массива

for i:=1 to 10 do write (a[i],` `);  
end.

Практическая работа № 3.

Конструирование алгоритмов.

Цель: конструирование алгоритмов с помощью программы «Паскаль»

Тип урока: Практическое применение знаний, умений, навыков.

Ход урока

1. Организация класса.

2. Инструктаж по ТБ.

3. Выполнение практической работы.

Задание №1

Напишите программу, которая вычисляет среднюю за неделю температуру воздуха.
Исходные данные вводятся с клавиатуры.
Пример входных данных.
Понедельник 12
Вторник10
Среда16
Четверг18
Пятница17
Суббота16
Воскресенье14
Пример выходных данных
Средняя температура за неделю: 14.71

var

a, b, c, d, e, f, g, sr: real;

begin

write('понедельник: ');

read(a);

write('вторник: ');

read(b);

write('среда: ');

read(c);

write('четверг: ');

read(d);

write('пятница: ');

read(e);

write('суббота: ');

read(f);

write('воскресенье: ');

read(g);

sr := (a + b + c + d + e + f + g) / 7;

writeln('Средняя температура за неделю: ', sr:1:2);

end.

Задание № 2

Сумма элементов, больших 50, но меньших 60. В массиве из программы 6 – это 55. program n_5;

var

i, s: integer;

const

a: array [1..10] of integer = (1, 55, 50, 120, 50, 17, 4, -50, 80, 50);

begin

s := 0;

for i := 1 to 10 do

if (a[i] 50) and (a[i] 60) then s := s + a[i];

writeln('s=', s)

end.

s=55

1. Закрепление.

2. Выводы по теме.

3. Подведение итогов.

Домашнее задание: § 2.2, выучить основные определения, задание № 7 стр.74

Дан массив из десяти целых чисел . определите, сколько элементов этого массива имеют максимальное значение.

Var 
 a: array[1..10] of integer; 
 max,i,x: integer;
begin 
 max:=-32768; 
 x:=1; 
 write('Введите элементы массива(через пробел) - '); 
 for i:=1 to 10 do  
  begin   
   read(a[i]);   
   if (a[i] max) then max:=a[i]    
    else if (a[i] = max) then x:=x+1;   
  end; 
 writeln('Элементов с максимальным значением: ', x);
end.