в двумерном массиве найтив двумерном массиве найти минимальные и максимальные элементы и вычислить их сумму произведение и разность (Составить
5-9 класс
|
программу)
Program Pr;
Var
a : array [1..100, 1..100] of integer;
i, max, min, j, n: integer;
Begin
cls;
read(n);
min := 100000;
max := -100000;
for i := 1 to n do
for j := 1 to n do
begin
read(a[i,j]);
if (a[i,j] > max) then
max := a[i,j];
if (a[i,j] < min) then
min := a[i,j];
end;
writeln ('Сумма = ', min + max);
writeln ('Разность = ', max - min);
writeln ('Произведение = ', max * min);
End.
Другие вопросы из категории
распаковать.
Б. Передать по каналу связи без использования архиватора.
Какой способ быстрее, если:
- средняя скорость передачи данных по каналу связи составляет 220 бит/с;
- объем сжатого архиватором документа равен 20% исходного;
- время, требуемое на сжатие документа, - 5 секунд, на распаковку – 1 секунда.
С РЕШЕНИЕМ,ПОЖАЛУЙСТА
степень, вторая увеличивает его на 2.Составьте алгоритм получения из числа 4 числа 68, содержащий не более
5 команд.
В ответе запишите только номера команд.
на экран полученный массив и количество замен. Протестировать программу на следующих исходных данных: а) Z=10 Массив: 1,2 2,6 3 -4,5 11 10,2 3,2 87 -15 б) Z=-2 Массив: 0 -3,1 11 -7,9 -2,1 -1,9 4
Читайте также
написать программу по которой
найти минимальный и максимальный элемент массива и все элементы между ними заменить 0...(10,50)
Срочно
Минимальный элемент A[3,4]=11
Максимальный элемент A[2,2]=89
Кумир!!!Полное решение!Заранее большое спасибо!! :3
Задать случайным образом 9 элементов числового массива – дробные числа от 10 до 50. В этом массиве:
1. Найти минимальный элемент и увеличить его на 100.
2. Найти максимальный элемент и поменять его местами с первым элементом.
3. Найти минимальный и максимальный элемент в числовом массиве из 10 элементов, заданных с клавиатуры. Поменять их местами.
знаки и затем найти сумму Помогите алгоритм составить в Паскале .