Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.88/41: Рейтинг темы: голосов - 41, средняя оценка - 4.88
ChertYaGa
0 / 0 / 0
Регистрация: 23.12.2008
Сообщений: 7
1

Одномерные массивы. Вставка, удаление элементов массива. Перестановка элементов массива. Сортировка массива методом пузырька

25.12.2008, 22:37. Просмотров 7535. Ответов 1
Метки нет (Все метки)

Помогите пожалуйста!

Дан массив, состоящий из N букв латинского алфавита

а) Заполнить массив датчиком случайных чисел
б) вывести исходный массив на экран
в) преобразовать массив по правилу: в первой половине переставить элементы в обратном порядке, во второй половине - заменить все отрицательные элементы нулями (дополнительного массива не заводить).
г) вывести полученный массив на экран
д) отсортировать массив в порядке убывания методом пузырька и вывести отсортированный массив на экран

Заранее всех благодарю!!!

Добавлено через 5 минут 58 секунд
Помогите!!!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.12.2008, 22:37
Ответы с готовыми решениями:

Вставка, удаление элементов массива
1)Дан массив размера N и целые числа K и L (1<=K<L<=N).Удалить из массива...

Одномерные массивы. Вычислить количество положительных элементов массива
Зачет хочу получить по информатике, помогите 1) "В одномерном массиве...

Перестановка элементов массива без использования дополнительного массива
Дан массив целых чисел, содержащий 10 элементов, записать в этот же массив...

Сортировка двумерного массива по убыванию по столбцам методом пузырька
Отсортировать всю матрицу n*m по столбцам по убыванию. Проверте есть ли в этой...

Отсортировать значения элементов массива по возрастанию методом "пузырька"
3. Дан массив из 12 чисел. Вывести на экран первоначальные значения элементов...

1
=light=
3 / 3 / 3
Регистрация: 24.12.2008
Сообщений: 15
27.12.2008, 15:43 2
Лучший ответ Сообщение было отмечено ChertYaGa как решение

Решение

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
uses crt;
 
var
 a:array[1..255] of integer;
 i,j:integer;
 n,t:integer;
 
procedure sort;
var
  i,t:integer;
  ok:boolean;
begin
  repeat
    ok:=true;
    for i:=1 to n-1 do
      if a[i]<a[i+1] then
        begin
          t:=a[i];
          a[i]:=a[i+1];
          a[i+1]:=t;
          ok:=false;
        end;
  until ok;
end;
 
 
begin
  repeat
    clrscr;
    randomize;
    write('Input array size: '); readln(n);
    writeln;
    if n mod 2<>0 then begin
      write('Input div2 n!');
      readkey;
    end;
  until n mod 2=0;
 
  for i:=1 to n do begin
    a[i]:=random(41)-20;               {zapolnenie [-20;20]}
    write(a[i],' ');                   {vivod}
  end;
 
  j:=(n div 2)+1;
 
  for i:=1 to j div 2 do begin         {zamena 1st polovini mas}
    t:=a[i];
    a[i]:=a[j-i];
    a[j-i]:=t;
  end;
 
  for i:=j to n do                     {zamena 2nd polovini mas}
    if a[i]<0 then a[i]:=0;
 
  writeln; writeln;
  for i:=1 to n do write(a[i],' ');
 
  sort;
  writeln; writeln;
  for i:=1 to n do write(a[i],' ');
 
  readkey;
end.
2
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
27.12.2008, 15:43

Перестановка элементов массива
Дан двухмерный массив.Поменять местами первый максимальный и последний...

Перестановка элементов массива
Помогите я новичок в Паскале у меня вот такое задание :cry: Розместить в...

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


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

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

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