Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 17.12.2014
Сообщений: 6

Составить структурную схему и программу для ввода обработки и печати массивов (одномерных и двухмерных)

24.12.2014, 15:59. Показов 937. Ответов 0
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Пример
Дана целочисленная матрица a размера (n×m), n,m≤10. В каждой строке матрицы
определить значение максимального элемента и его номер, т.е. получить матрицу (n×2).

Текст программы
Код Pascal
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
{ программа обработки двумерной матрицы }
type
matrix=array[1..10,1..10] of integer;
var
a:matrix;
b:array[1..10,1..2] of integer;
i,j:integer;
n,m:integer;
max,k:integer;
begin
writeln('введите размеры матрицы n и m');
write('n=');
read(n);
write('m=');
read(m);
{ Ввод матрицы a}
writeln('введите построчно матрицу a');
for i:=1 to n do
for j:=1 to m do
read(a[i,j]);
{ Вывод матрицы a}
writeln('Исходная матрица a');
for i:=1 to n do
begin
for j:=1 to m do
write(a[i,j]:3,' ');
writeln;
end;
{ поиск максимального элемента и его номера
в каждой строке матрицы }
for i:=1 to n do
begin
max:=a[i,1]; k:=1;
for j:=2 to m do
if a[i,j]>max then
begin
max:=a[i,j];
k:=j;
end;
b[i,1]:=a[i,k];
b[i,2]:=k;
end;
writeln('матрица результатов b');
for i:=1 to n do
begin
for j:=1 to 2 do
write(b[i,j]:3,' ');
writeln;
end;
end.
Результаты вычислений
введите размеры матрицы n и m
n=3
m=4
введите построчно матрицу a
1 2 3 4
4 5 3 4
6 7 5 4
Исходная матрица a
1 2 3 4
4 5 3 4
6 7 5 4
матрица результатов b
4 4
5 2
7 2

Вот моё задание:
Дана целочисленная матрица a размера (n×m), n,m≤10. В каждом столбце матрицы a
переставить элементы столбца так, чтобы вначале были все отрицательные элементы, а
затем – все положительные элементы и число нуль ( порядок следования элементов в
каждой группе не менять).

Помогите, пожалуйста!
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
24.12.2014, 15:59
Ответы с готовыми решениями:

Составить программу для ввода двухмерных массивов А и В
помогите плиз:wall: Составить программу для ввода двухмерных массивов А и В размерностью 4х5 , А=(Akn); b=(Bkn); k:=1,2,3,4;...

Составить программу для ввода двух одномерных массивов А и В и вычисления матрицы C
Доброе время суток резиденты !! У меня возникла трудность в решении одной задачки ..(скорей всего в алгоритмизации/постановки...

Написать программу для ввода, обработки и печати матрицы
Для матрицы А(m, n), 1<(m, n)<10, подсчитать количество элементов, равных нулю. Переставить строки по убыванию значений максимальных...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
24.12.2014, 15:59
Помогаю со студенческими работами здесь

Написать программу для ввода, обработки и печати матрицы
Для матрицы G(m, n), 1<(m, n)<10, найти значение минимального элемента. Переставить столбцы по убыванию количества положительных элементов...

Паскаль. Разработать алгоритм и программу с единственным циклом для обработки одномерных массивов
При заданных коэффициентах А1,А2,...,Аn многочлена A1X+A2(X)^2+...+An(X)^n найти последовательность C1?C2?///?Cn значений коэффициентов его...

Написать процедуру для ввода и вывода элементов двухмерных массивов
Написать процедуру для ввода и вывода элементов двухмерных массивов, как целого так и вещественного типа помогите пожалуйста!!! очень...

Составить программу с использованием рекурсивной функции для сравнения двух одномерных массивов.
Составить программу с использованием рекурсивной функции для сравнения двух одномерных массивов.

Составить программу для обработки многомерных массивов с использованием циклов.
Составить программу для обработки многомерных массивов с использованием циклов: Дана цело-численная квадратная матрица. Определить: а)...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Новые блоги и статьи
Уведомление о неверно выбранном значении справочника
Maks 06.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "НарядПутевка", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если в документе выбран неверный склад. . .
Установка Qt Creator для C и C++: ставим среду, CMake и MinGW без фреймворка Qt
8Observer8 05.04.2026
Среду разработки Qt Creator можно установить без фреймворка Qt. Есть отдельный репозиторий для этой среды: https:/ / github. com/ qt-creator/ qt-creator, где можно скачать установщик, на вкладке Releases:. . .
AkelPad-скрипты, структуры, и немного лирики..
testuser2 05.04.2026
Такая программа, как AkelPad существует уже давно, и также давно существуют скрипты под нее. Тем не менее, прога живет, периодически что-то не спеша дополняется, улучшается. Что меня в первую очередь. . .
Отображение реквизитов в документе по условию и контроль их заполнения
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "ПланированиеСпецтехники", разработанного в конфигурации КА2. Данный документ берёт данные из другого нетипового документа. . .
Фото всей Земли с борта корабля Orion миссии Artemis II
kumehtar 04.04.2026
Это первое подобное фото сделанное человеком за 50 лет. Снимок называют новым вариантом легендарной фотографии «The Blue Marble» 1972 года, сделанной с борта корабля «Аполлон-17». Новое фото. . .
Вывод диалогового окна перед закрытием, если документ не проведён
Maks 04.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: реализовать программный контроль на предмет проведения документа. . .
Программный контроль заполнения реквизитов табличной части документа
Maks 02.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: 1. Реализовать контроль заполнения реквизита. . .
wmic не является внутренней или внешней командой
Maks 02.04.2026
Решение: DISM / Online / Add-Capability / CapabilityName:WMIC~~~~ Отсюда: https:/ / winitpro. ru/ index. php/ 2025/ 02/ 14/ komanda-wmic-ne-naydena/
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru