1) Дан массив из 30 чисел. Сколько элементов массива равны максимальному элементу.
Например, в массиве 4 3 9 5 2 9 1 2 5 9 3 1 три элемента равны максимальному. Сначала надо найти значение максимального, а потом еще раз просмотреть массив и найти количество элементов, равных максимальному.
2) Найти максимальный элемент массива и изменить его — поставить на его место ноль.
Например, в массиве 4 2 6 3 2 после обработки получится ряд 4 2 0 3 6.
Сначала найти максимальный элемент и ЕГО НОМЕР, а потом элементу с заданным номером присвоить новое значение.
3) Создать двумерный массив размером 7 на10, заполнить его значения из файла. Вывести на экран в виде таблицы. Найти сумму.
4) Заполнить двумерный массив размером 4 на 5 числами с клавиатуры. Найти максимальный элемент массива. Найти среднее арифметическое элементов массива.
5) Дан целочисленный массив из 30 элементов. Элементы могут принимать значения от 0 до 100 – баллы, полученные на ЕГЭ. Опишите программу, которая подсчитывает и выводит средний балл учащихся, сдавших экзамен (получивших оценку более 20 баллов). Гарантируется, что хотя бы один ученик в классе успешно сдал экзамен. Исходные данные объявлены так, как показано ниже.
Паскаль |
const N = 30; var A: array[1..N] of integer; i, x, y: integer; s: real; begin for i:=1 to N do readln(A[i]); … end. |