Информатика 10-А класс. Сформировать и вывести на экран последовательность из n элементов, заданных датчиком случайных чисел на интервале [-23, 34].. Найти наименьший элемент одномерного массива, состоящего из n элементов. Элементы вводятся с клавиатуры.

Информатика 10-А класс

Дата проведения урока - 15.04.2020 г.

Тема урока: Типовые задачи обработки массивов.

Прочитать по учебнику § 26, стр. 175-180. Таблицу «Система основных понятий» на стр. 180 переписать в тетрадь и выучить основные понятия

1 - Сформировать и вывести на экран последовательность из n элементов, заданных датчиком случайных чисел на интервале [-23, 34].

Program posled;

Var a: array[1..100] of integer;

i, n: integer;

Begin

Write (‘Сколько элементов? ’); Readln (n);

For i=1 to n do

begin

a[i]:= Random(58)-23;

writeln (a[i],’ ‘);

end;

End.

2 - Найти наименьший элемент одномерного массива, состоящего из n элементов. Элементы вводятся с клавиатуры.

Program minim;

Var a: array[1..100] of real;

i, n: integer;

min: real;

Begin

Write (‘n=’); Readln (n);

For i:=1 to n do

begin

write(‘a[‘,i,’]=’); readln (a[i]);

end;

min:=a[1];

For i:=2 to n do

If a[i]< min then min:=a[i];

Writeln(‘наименьшее число: ‘,min);

End.

Разработать программы на языке Турбо Паскаль для следующих задач, записать их в тетрадь.

1. Массив А вводится с клавиатуры. Найти сумму его элементов. Размер произвольный.

2. Найти наибольший элемент последовательности, элементы которой вводятся с клавиатуры. Размер произвольный.