Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
1 / 1 / 1
Регистрация: 16.09.2010
Сообщений: 38
1

Массивы

16.09.2010, 19:55. Просмотров 611. Ответов 10
Метки нет (Все метки)


помогите решыть!!!!!!!!!
есть 2 двумерных массива 10на10 !!!
нужно создать 4 массива, которые будут иметь в себе выполнение операции над теми 2 массивами!!!!!!!!
нужно очень срочно!!!!!!!!!!!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
16.09.2010, 19:55
Ответы с готовыми решениями:

Даны массивы а и b. Получить новые массивы a и b, элементы которых вычисляются по правилу: ai=bi, bi= -ai
Даны массивы а и b, состоящие из n-элементов каждый. Получить новые массивы a и b, элементы...

Массивы
Дана матрица, состоящая из n строк и n столбцов или одномерные массивы из n элементов каждый....

Массивы
Помогите пожалуйста справится с это задачей . не получается . задача: даны два массива А и B...

Массивы
Даны натуральные числа a1, a2, ..., an. Указать те, у которых остаток от деления на М равен L (0...

10
Модератор
62858 / 46905 / 32327
Регистрация: 18.05.2008
Сообщений: 113,651
16.09.2010, 20:19 2
Цитата Сообщение от andri! Посмотреть сообщение
которые будут иметь в себе выполнение операции над теми 2 массивами!!!!!!!!
Какие операции, в чем суть задания?
0
1 / 1 / 1
Регистрация: 16.09.2010
Сообщений: 38
16.09.2010, 20:32  [ТС] 3
например сортировка массива!.
умнажения,диления....и прочье!

Добавлено через 1 минуту
оприделение max. min елемента!
0
Идеи становятся силой...
121 / 121 / 64
Регистрация: 08.12.2009
Сообщений: 445
16.09.2010, 20:36 4
тебе сортировка, умножение и все остальное над двумя массива надо сделать или 4??
0
Модератор
62858 / 46905 / 32327
Регистрация: 18.05.2008
Сообщений: 113,651
16.09.2010, 20:38 5
например сортировка массива!.
В результате сортировки массивы не размножатся.
С таким пренебрежительным отношением к программированию лучше успокойтесь и не дергайтесь. Как нибудь и без него проживете.
0
1 / 1 / 1
Регистрация: 16.09.2010
Сообщений: 38
16.09.2010, 20:40  [ТС] 6
я сам незнаю!
что задали то и написал!!!!!!!
помогите зделать хоч что небуть!
0
Модератор
62858 / 46905 / 32327
Регистрация: 18.05.2008
Сообщений: 113,651
16.09.2010, 20:42 7
помогите зделать хоч что небуть!
Сейчас с такой речью в дворники не везде берут, стыдно должно быть выставлять свою безграмотность на всеобщее обозрение...
Или наплевать вам на всех, презренных...
0
1 / 1 / 1
Регистрация: 16.09.2010
Сообщений: 38
16.09.2010, 20:43  [ТС] 8
я только начинаю учить всьо ето!!1
0
634 / 217 / 64
Регистрация: 03.11.2009
Сообщений: 488
16.09.2010, 20:51 9
andri!, если Вы только начинаете учить программирование, это не значит что условие должно быть вот таким быть не понятным. Объясните нормально что вам нужно сделать в этом задание .
0
1 / 1 / 1
Регистрация: 16.09.2010
Сообщений: 38
16.09.2010, 21:04  [ТС] 10
Мне учитель задал такое же условие!!
еслиб я разобрался что здесь делать , не просил бы мне помочь!
0
393 / 279 / 38
Регистрация: 06.08.2010
Сообщений: 834
16.09.2010, 22:06 11
эх,ладно
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
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
Uses
   CRT;
const
  M = 3; N = 4;
 
type
  matritsa = array[1..M, 1..N] of integer;
 
const
  a: matritsa =   ((2, 6, 4, 2),
                                   (9, 1, 8, 3),
                (5, 7, 3, 8));
 
var
  i, j: integer;
  kl:matritsa;
 
procedure puziryok_2(mass: matritsa; M, N: integer; Var rez:matritsa);
var
  i, j, i1, j1, k: integer;
  c: Integer;
label   metka;
begin
  i1 := M;
  j1 := N;
  for k := 1 to M * N - 1 do
  begin
    for i := 1 to M do
      for j := 1 to N do
      begin
        if not ((i < i1) OR (i = i1) AND (j < j1)) then
          goto metka;
        if j <> N then
          if mass[i, j] < mass[i, j + 1] then
          begin
            c := mass[i, j];
            mass[i, j] := mass[i, j + 1];
            mass[i, j + 1] := c
          end{if};
        if (j = N) AND (i <> M) then
          if mass[i, j] < mass[i + 1, 1] then
          begin
            c := mass[i, j];
            mass[i, j] := mass[i + 1, 1];
            mass[i + 1, 1] := c
          end
      end;
    metka: if j1 > 1 then
      j1 := j1 - 1
    else
    begin
      j1 := N;
      i1 := i1 - 1
    end
  end;;
  rez:=mass;
end;
 
begin
 
  puziryok_2(a, M, N, kl);
 
  for i := 1 to M do
  begin
    for j := 1 to N do
      Write(kl[i, j],   '    '   );
    WriteLn
  end;
 
end.
Добавлено через 2 минуты
Это сортировка
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
16.09.2010, 22:06

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь или здесь.

Массивы
Написать программу, которая заменяет все заглавные буквы строчными, а строчные – заглавными в...

массивы
ребят послезавтра зачет я уже 2 дня ломаю голову над след. задачами а вам наверно делов на 5...

Массивы
Здравствуйте форумчане) Посмотрите пожалуйста лабораторку по ММУ(Модели и Методы Управления): дана...

Массивы
Дано массив целых чисел. Найти разницу наибольшего и наименьшего чисел.

массивы
пожалуйста срочно помогите.отрицательные элементы массива заменить на сумму.вывести преобразованный...

Массивы
Добрый день! Задача:Составить значение функции S(x) по формуле s(x)=\sum_{1}^{5}...


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

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

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