Помогите пожалуйста с задачкой (решить в паскале) Дано массив А[1..n, 1..m]. Составить программу поиска всех элементов массива А, что меньше чем все
10-11 класс
|
соседние.
В программе нужно применить те значения, что на фото.
const
n=3;
m=5;
var
i,j:integer;
a:array[1..n,1..m]of integer;
begin
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(10);
write(a[i,j]:3);
end;
writeln;
end;
write('Искомые элементы: ');
for i:=1 to n do
for j:=2 to m-1 do
if (a[i,j]<a[i,j-1]) and (a[i,j]<a[i,j+1]) then
write(a[i,j]:3);
end.
соседние - это в строке? Или в строке и столбце? Или в строке, столбце и по диагонали?
А для крайних элементов (первый и последний столбец) проверку делаем (у них только один сосед). Распечатать только значение элементов без координат?
В тексте у тебя сказано, что ищем меньший, а на листочке для большего выражение записано. Как правильно?
Комментарий удален
Другие вопросы из категории
помогите ,котаны:3
нужна программа в паскале
a := -5;
b := -3;
a := a - b*3;
Читайте также
Входными данными являются число k, N и N целых чисел.
В массиве определить индекс k-го наибольшего элемента массива.
Считать, что все элементы разные.
Ограничения:
Считать, что все элементы разные.
N принимает значения от 1 до 20.
k принимает значения от 1 до N.
Формат входных данных:
k, N и N целых чисел
Формат выходных данных:
индекс второго наибольшего элемента массива
Составить программу на Паскале. Ввести 10 целых случайных чисел (в интервале от -10 до 10). Вывести исходный массив. Найти и вывести: 1) минимальный элемент и его индекс; 2) сумму всех элементов массива; 3) количество отрицательных элементов. К каждому элементу массива прибавить 1, вывести получившийся массив. Подсказка: 1)random(10)-10 2) положительные: >0 неположительные: <=0 отрицательные: <0 неотрицательные:>=0
программирования алгоритм, который находит и выводит среднее арифметическое всех элементов массива, оканчивающихся цифрой 5. Гарантируется, что хотя бы один такое элемент в массиве есть.
НАРОД ПОМОГИТЕ ПОЖАЛУЙСТА
Пожалуйста...Срочно...Завтра крайний срок сдачи...Помогите...
Дан массив строк без пробелов. Напечатать строки, вторая половина которых не содержит цифры.
1.В одномерном массиве перенести элемент, стоящий на первом месте в конец массива.
2.вывести на печать номера точек, лежащих в круге радиусом r. Координаты точек заданы массивами (x1,x2,...,x10), (y1,y2,...,y10).
3.В одномерном массиве найти сумму положительных, произведение отрицательных, количество четных элементов.
4.Дан массив, состоящий из 50 элементов, найти предпоследний нечетнный элемент.