Найбільший елемент Масиви. Задача 1 Знайти максимальний елемент масиву.

Презентация:



Advertisements
Похожие презентации
Одновимірні масиви 11 клас (продовження). Задача 4. У даному масиві з десяти дійсних чисел визначити найбільше значення. Спочатку вважатимемо, що значення.
Advertisements

МАССИВЫ Если работа программы связана с хранением и обработкой большого количества однотипных переменных, для их представления в программе можно использовать.
Поиск максимального и минимального элемента линейного массива на языке Turbo Pascal. Program poisk; Const n=10; Type mass=array[1..n] of integer; Var a:mass;
К. Поляков, Программирование на языке Паскаль Часть II Тема: Поиск максимального элемента массива.
Чтобы найти максимальный элемент в массиве и потом производить с ним какие-либо действия, нужно узнать его номер (индекс - I). Для этого вначале будем.
Тема: Нахождение минимального и максимального элемента в массиве.
PROGRAM example1; const m=100; var a : ARRAY [1.. m] of INTEGER; i,k,n,q : INTEGER; BEGIN readln (n); randomize; WRITELN('Полученный массив:' ); FOR i.
5.Дана матрица А и вектор Х соответствующих размерностей. Нечетные строки матрицы заменить элементами вектора Х. Результаты работы: n=4 m=
Методическое пособие по массивам Одномерные массивы Одномерные массивы Двухмерные массивы Двухмерные массивы.
Проверка пройденного материала. Исправьте ошибки в решении задачи: заполнить и вывести массив W(3) вещественных чисел Program Mass; Var b:Array[1..10]
Задачи сортировки для одномерного массива ПРОСТОЙ ВЫБОР.
Табличні величини. Масиви. Знайти суму елементів одновимірного масиву. Program Suma; var A:array[1..5] of integer; S,i:integer; begin for i:=1 to 5 do.
Решение задач с использованием массивов
Чтобы найти максимальный элемент в массиве и потом производить с ним какие-либо действия, нужно узнать его номер (индекс - I).Чтобы найти максимальный.
Масив – це впорядкований іменований набір із фіксованої кількості однотипних даних. а 1 а 2 а 3 в 1 в 2 с 1 Доступ до будь – якого елементу масиву здійснюється.
I i A: array[1..10] of integer; For i:=1 to 10 do For i:=1 to 10 do Readln(A[i]); Readln(A[i]); А Writeln(A[i]);
1 ТАБЛИЧНІ ВЕЛИЧИНИ (УРОК 1) (Turbo Pascal 7.0) ТАБЛИЧНІ ВЕЛИЧИНИ (УРОК 1) (Turbo Pascal 7.0) Інформатика-11 Тема-6.
Перед началом изучения новой темы прослушайте моё сообщение.
Масиви Оголошення, опис та введення масивів Оголошення, опис та введення масивів Оголошення, опис та введення масивів Оголошення, опис та введення масивів.
Тема: «Понятие квадратная матрица» :17:47.
Транксрипт:

Найбільший елемент Масиви

Задача 1 Знайти максимальний елемент масиву

a: array[1..10] of integer; ? max: integer;

a: array[1..10] of integer; 1 max: integer; 589 if a[i]>max then max:=a[i];

Пошук найбільшого елемента Припускаємо, що найбільшим є перший елемент Переглядаємо увесь масив Якщо поточний елемент більший за найбільший, то записуємо його як найбільший

program pmax; var a:array[1..10] of integer; i, max :integer; begin for i:=1 to 10 do readln(a[i]); max:=a[1]; for i:=2 to 10 do if a[i] >max then max:=a[i]; writeln(max=,max); readln; end.