Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Дана матрица размером 6x9. Найти среднее арифметическое наибольшего и наименьшегозначений ее элементов. TURBO PASCAL

5-9 класс

Grachev79 21 мая 2014 г., 11:32:12 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
Кристипун1
21 мая 2014 г., 12:27:13 (9 лет назад)

const
 N = 6;
 M = 9;

var
 mas:array[1..N,1..M] of integer;
 max,min,j,i:integer;

begin
 max:=-maxint;
 min:=maxint;
 for i:=1 to N do
  for j:=1 to M do
  begin
   if max<mas[i,j] then
    max:=mas[i,j];
   if min>mas[i,j] then
    min:=mas[i,j];
  end;
 writeln((max+min)/2);
end.

Ответить

Другие вопросы из категории

разгадайте кроссворд "Хранение информации"

1) 1 прибор для записи и воспроизведения звука.

Составьте программу,

которая задает вопрос: «В каком году был основан город Минск?» (например, в
1067 г., в 993 г. или в 1147 г.). В случае верного ответа программа должна
сообщить «Верно», в противном случае «Вы ошиблись».

Читайте также

1.Дан массив целых чисел, найти среднее арифметическое всех элементов массива.

2. Дан массив целых чисел,найти количество отрицательных элементов массива.
3. Дан массив целых чисел,найти количество чётных чисел в массиве.

Помогите пожалуйста решить задачи!!!

Задание 1. Составить программу для вычисления по формуле:

Y = √|2x² - 7x| + 12
Задание 2.
Составить программу для вычисления значения функции:
F(x) = \left \{ {{0, If x <=2} \atop {1/(x^{2}+ 6), if x>1 }} \right. {{

Задание 3. Дано натуральное N. Вычислить: S=2*4*6*...*2N.
Задание 4. Дан массив А(20), заполненный датчиком случайных числе. Найти среднее арифметическое всех элементов массива.
Задание 5. дана матрица А(10,10), заполненная датчиком случайных чисел. Найти сумму значений всех элементов данной матрицы.



Вы находитесь на странице вопроса "Дана матрица размером 6x9. Найти среднее арифметическое наибольшего и наименьшегозначений ее элементов. TURBO PASCAL", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.