найти максимальный элемент в массиве А10,заполненном случайным образом.
5-9 класс
|
var
a : array [1..10] of integer;
i, max : integer;
begin
for i := 1 to 10 do a[i] := trunc (random (500));
max := 1;
for i := 2 to 10 do
if a[i] > a[max] then max := i;
writeln ('Максимальный элемент a[', max, '] = ', a[max]);
end.
Другие вопросы из категории
дорабатывать.....не знаю что делать((((
Читайте также
его индекс.
5) Найти максимальные элементы среди положительных элементов массива 6) Найти максимальные элементы среди отрицательных элементов массива
7) Определить количество максимальных элементов массива
P.S Ребят, все в паскале...заранее спасибо=*
2. Создать массив A из 10 элементов, заполненный случайным образом числами принадлежащих промежутку (0;20). Вывести полученный массив на экран. Вычислить количество элементов массива, значения которых не превышают среднее арифметическое значений его элементов.
в,их значения и количество.
2.В одномерном массиве целых чисел,содержащем 20 элементов,удалить k-ый элемент массива.Массив заполняется случайным образом числами от 0 до 50.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
ИЛИ Дан массив, содержащий 12 элементов и заполненный по формуле A=(i-4)/(3*i). Найти количество элементов в этом массиве больших 0, но меньших 0,2. (решение писать как в турбо паскале)