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

Pascal (Паскаль)

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

Сформировать и отсортировать по возростания массив - Pascal

14.05.2010, 20:59. Просмотров 322. Ответов 2
Метки нет (Все метки)

Здраствуйте! помогите решить задачу "Сформировать массив B(k) из элементов первой строки и первого столбца A(n,m). Отсортировать массив по возростанию." Буду очень презнателен, за вашу помощь. Зарание Спасибо!
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
14.05.2010, 20:59
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Сформировать и отсортировать по возростания массив (Pascal):

Сформировать массив по формуле Yk=K*cos (Ak). Отсортировать массив по возрастанию - Pascal
Дан массив размера N. Сформировать массив Yn, каждый элемент которого определяется по формуле Yk=K*cos (Ak). Отсортировать массив Yk по...

Отсортировать массивы, объединить и результирующий массив отсортировать - Pascal
Помогите пожалуйста, нужно написать в паскале программу: Даны массив А(16), В(10).Отсортировать их по убыванию, а затем объединить в...

Сформировать два списка, отсортировать их и объединить в один, не нарушая порядка - Pascal
Сформировать два списка, отсортировать их и объединить в один, не нарушая порядка. Заранее спасибо)

Вычислить среднее арифметическое элементов, дописать в массив и отсортировать массив по возростанию - Pascal
5)Вычислить среднее арифметическое элементов, дописать в массив и отсортировать массив по возростанию.

Массив символов. В процедуре отсортировать массив по алфавиту в обратном порядке - Pascal
Ввести данные (тип данных указан в вариантах) с клавиатуры в виде «Х=», где i – индекс элемента. - После окончания ввода для контроля...

Считать матрицу из текстового файла, сформировать из нее вектор, отсортировать и изменить его по условиям - Pascal
Уважаемые участники форума. Напишите, пожалуйста, программу.pas. Считать матрицу из текстового файла. Из ее элементов,...

2
Phantom
Эксперт С++
3165 / 847 / 16
Регистрация: 29.12.2008
Сообщений: 952
14.05.2010, 22:03 #2
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
program prog;
var A: array [1..30, 1..20] of Integer;
    B: array [1..50] of Integer;
    i,j,N,M,K,c: byte;
begin
{ввод матрицы}
 writeln('Введите N'); readln(N);
 writeln('Введите M'); readln(M);
 writeln('Введите матрицу: ');
 for i:=1 to N do
 for j:=1 to M do
 A[i,j]:=random(40);
 
{заполнение массива элементами первых строки и столбца}
 K:=N+M-1;
 for i:=1 to M do B[i]:=A[1,i];
 for i:=M+1 to K do B[i]:=A[i-M+1,1];
{вывод матрицы и массива}
 writeln('Матрица:');
 for i:=1 to N do
 begin
 for j:=1 to M do
 write(A[i,j]:4);
 writeln;
 end;
 
 writeln('Массив:');
 for i:=1 to K do write(B[i]:4);
 readln;
{пузырьковая сортировка массива}
 for i:=k downto 2 do
  for j:=2 to i do
  if B[j]<B[j-1] then
  begin
  c:=B[j];
  B[j]:=B[j-1];
  B[j-1]:=c;
  end;
{вывод отсортированного массива}
 writeln('Отсортированный массив:');
 for i:=1 to K do write(B[i]:4);
 readln;
 
end.
0
ViNiLz
0 / 0 / 0
Регистрация: 14.05.2010
Сообщений: 3
14.05.2010, 22:19  [ТС] #3
большое спасибо!))) очень помог))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
14.05.2010, 22:19
Привет! Вот еще темы с ответами:

Расставте элементы каждой строки в порядке возростания - Pascal
Дана квадратная матрица А порядка n. Расставте элементы каждой строки в порядке возростания.

Массив. Сформировать массив C, элементы которого равны сумме элементов массивов A и B - Pascal
Сформировать массив C из массивов A и B, элементы которого равны сумме соответствующих элементов A и B умноженного на больший из них.

Дан одномерный массив Z[n]. Сформировать массив L, содержащий только нечетные элементы массива Z - Pascal
Задача на Pascal. Не решу - зачёт не поставят.

Сформировать массив содержащий 15 случайных элементов с помощью датчика чисел, получить новый массив - Pascal
Сформировать массив содержащий 15 случайных элементов с помощью датчика чисел, получить новый массив. Каждый элемент которого равен Кубу...


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

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

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