- Главная
- Информатика
- Решение задач на использованием процедур и функций
Содержание
Слайд 2
Цель работы:
Учащиеся должны знать:
правила описания массивов на Паскале;
правила организации ввода и
Цель работы:
Учащиеся должны знать:
правила описания массивов на Паскале;
правила организации ввода и
вывода значений массива;
правила программной обработки массивов.
Учащиеся должны уметь:
составлять типовые программы обработки массивов: заполнение массива, поиск и подсчет элементов, нахождение максимального и минимального значений, сортировки массива и др.
правила программной обработки массивов.
Учащиеся должны уметь:
составлять типовые программы обработки массивов: заполнение массива, поиск и подсчет элементов, нахождение максимального и минимального значений, сортировки массива и др.
Слайд 3
1. Набрать программу нахождения суммы всех элементов массива:
program massiv;
uses crt;
const n=10;
var s,
1. Набрать программу нахождения суммы всех элементов массива:
program massiv;
uses crt;
const n=10;
var s,
i: integer;
a: array [1..n] of integer;
begin
clrscr;
randomize;
writeln ('Исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(10);
writeln ('a[',i,']=',a[i]);
end;
s:=0;
for i:=1 to n do
s:=s+a[i];
writeln ('Сумма всех элементов массива S=',s);
readln;
end.
a: array [1..n] of integer;
begin
clrscr;
randomize;
writeln ('Исходный массив: ');
for i:=1 to n do
begin
a[i]:=random(10);
writeln ('a[',i,']=',a[i]);
end;
s:=0;
for i:=1 to n do
s:=s+a[i];
writeln ('Сумма всех элементов массива S=',s);
readln;
end.
2. Изменить программу таким образом, чтобы:
1) массив состоял из 15 элементов вещественного типа;
2) значения элементов массива должны меняться в интервале от 0 до 5;
3) в результате выполнения программы должно быть найдено произведение всех элементов массива, а не их сумма.