Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal ABC

Войти
Регистрация
Восстановить пароль
 
rew438125
1 / 1 / 0
Регистрация: 21.11.2016
Сообщений: 22
#1

Двумерные массивы - Pascal ABC

21.11.2016, 14:38. Просмотров 425. Ответов 3
Метки нет (Все метки)

9. Обработка двумерных массивов:

- В двумерном массиве, состоящем из целочисленных элементов, поменять местами
в каждой строке наибольший и наименьший элементы.

-Дана матрица A(n×n). Сформировать одномерный массив из отрицательных
элементов этой матрицы, расположенных ниже главной диагонали.

-Для целочисленной матрицы найти для каждой строки число элементов, кратных
пяти, и наибольший из полученных результатов
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
21.11.2016, 14:38
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Двумерные массивы (Pascal ABC):

Двумерные массивы - Pascal ABC
здравствуйте, помогите с задачей на двумерные массивы

двумерные массивы - Pascal ABC
1. В матрице А(8,8) найти сумму элементов главной диагонали.

двумерные массивы - Pascal ABC
Дан двумерный массив размером n*m заполненный случайным образом. 1. заменить минимальный по модулю элемент каждого столбца нулем. 2....

Двумерные массивы - Pascal ABC
Дана целочисленная прямоугольная матрица. Определить: • количество столбцов, содержащих хотя бы один нулевой элемент; • номер строки, в...

Двумерные массивы - Pascal ABC
Тема 10. «двумерные Указание: для каждой задачи создаme aлrориrм и программу. Заmолните двумерный числовой массив В(6,6) случайными целыми...

Двумерные массивы - Pascal ABC
Помогите решить В квадратной матрице размером M*M, имеющий имя MKM, содержаться целые числа M- число строк столбцов. Ввести элементы...

3
magirus
Супер-модератор
Эксперт по компьютерным сетямЭксперт Windows
27149 / 15426 / 911
Регистрация: 15.09.2009
Сообщений: 67,180
Записей в блоге: 78
21.11.2016, 14:44 #2
это одна задача или три в одном?
0
KatrinLuxury
12 / 12 / 5
Регистрация: 14.11.2016
Сообщений: 213
21.11.2016, 15:45 #3
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
uses crt;
var a:array[1..100,1..100] of integer;
i,j,n,m,max,min:integer;
begin write ('Введите количество строк: ');
 read(n); writeln; write ('Введите количество элементов в строке: ');
  read(m); writeln; writeln('Введите массив: ');
  for i:=1 to n do begin
  for j:=1 to m do begin
  write(' a[',i,',',j,']=');
   read(a[i,j]);
    end;
     writeln;
     end;
     writeln;
     writeln('Исходный массив: ');
     for i:=1 to n do begin
      for j:=1 to m do
      write(a[i,j],' ');
      writeln;
      end;
      writeln;
       writeln('Конечный массив: ');
        for i:=1 to n do begin
        min:=a[i,1];
        max:=a[i,1];
        for j:=2 to m do begin
        if (min>a[i,j]) then
         min:=a[i,j];
         if (max<a[i,j]) then max:=a[i,j];
end;
for j:=1 to m do begin
if (a[i,j]=min) then a[i,j]:=max else
if (a[i,j]=max) then a[i,j]:=min;
write(a[i,j],' ');
end;
writeln;
end;
end.
Добавлено через 6 минут
3.
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
uses crt;
var t:array[1..20,1..20] of integer;
    n,i,j,k,max,imax:integer;
begin
clrscr;
write('Введите размер матрицы n=');
readln(n);
for i:=1 to n do
for j:=1 to n do
   begin
    write('t[', i, ',', j, '] ');
    readln(t[i,j]);
   end;
clrscr;
writeln('Матрица:');
for i:=1 to n do
  begin
    for j:=1 to n do
    write(t[i,j]:4);
    writeln;
  end;
max:=0;
imax:=1;
for i:=1 to n do
  begin
   k:=0;
   for j:=1 to n do
   if t[i,j] mod 5=0 then
   k:=k+1;
   writeln('В строке ',i,' ',k,' элементов');
   if k>max then
     begin
       max:=k;
       imax:=i;
     end;
  end;
writeln('Наибольшее количество элемеентов =',max,' в строке ',imax);
readln
end.
0
rew438125
1 / 1 / 0
Регистрация: 21.11.2016
Сообщений: 22
21.11.2016, 20:05  [ТС] #4
3 ЗАДАЧИ
0
21.11.2016, 20:05
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
21.11.2016, 20:05
Привет! Вот еще темы с ответами:

Двумерные числовые массивы - Pascal ABC
Указание: для каждой задачи создайте алгоритм и программу. Заполните двумерный числовой массив В(6,6) случайными целыми числами в...

Двумерные массивы (Проверьте) - Pascal ABC
Дано два массива, содержащие соответственно 3*4 и 5*2 целых компонентов. Ввести оба массива, найти в каждом массиве произведение...

двумерные массивы - лаба. - Pascal ABC
Помогите составить программу!:wall: Дан двумерный массив, содержащий 4строки и 3 столбца. Элементами массива являются...

Двумерные массивы (обработка) - Pascal ABC
Здравствуйте !Ребят помогите ,пожалуйста, составить программки для следующих условий : 1) Найти суммы и произведения элементов числового...


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

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.