0 / 0 / 0
Регистрация: 31.05.2010
Сообщений: 35
1

Переставить элементы массива так, чтобы сначала располагались все нули, затем все единицы

02.06.2010, 13:09. Показов 4167. Ответов 1
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
В массиве А каждый элемент равен 0, 1, 2. Переставить элементы массива так, чтобы сначала располагались все нули, затем все единицы, и, наконец все двойки.
Pascal
1
2
3
sum:=0;
for i:=1 to n do
 if a[i] mod k=0 then sum:=sum+a[i];
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.06.2010, 13:09
Ответы с готовыми решениями:

Переставить элементы массива так, чтобы сначала располагались все единицы, затем все двойки и, наконец, все нули
Ребят помогите пожалуйста В массив x(N) каждый элемент равен 0,1 или 2. Приставить элементы...

Переставить элементы массива так, чтобы располагались все нули, затем все единицы, и, наконец, все двойки
Помогите пожалуйста решить задачу: В массиве х(12) каждый элемент равен 0, 1 или 2. Переставить...

Сформировать массив L из массивов A и B путем их слияния так, чтобы сначала располагались все элементы массива A, а затем все элементы массива B.
Задан массив A из N элементов и массив B из M элементов. Сформировать массив L из массивов A и B...

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

1
773 / 578 / 324
Регистрация: 17.06.2009
Сообщений: 1,188
02.06.2010, 13:46 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
uses crt;
const n=10;
var a: array[1..n] of byte; 
      i,j,pr: byte;
begin
 randomize;
 clrscr;
 writeln('исходный массив: ');
 for i:=1 to n do
  begin
   a[i]:=random(3);
   write(a[i]:3);
  end;
 writeln;
 for i:=1 to n-1 do
  for j:=i+1 to n do
   if a[i]>a[j] then 
    begin
     pr:=a[i];
     a[i]:=a[j];
     a[j]:=pr;
    end;
 writeln('результат: ');
 for i:=1 to n do
  write(a[i]:3);
end.
1
02.06.2010, 13:46
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.06.2010, 13:46
Помогаю со студенческими работами здесь

Переставить элементы массива так, чтобы сначала следовали все отрицательные числа, а затем все остальные
Помогите, пожалуйста, решить задачу в Pascal Дан целочисленный массив размером N. Преобразовать...

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

Переставить элемента массива, так чтобы сначала было расположены все положительные элементы, потом все отрицательные
Всем добрый вечер! Есть задача: Кто знает как ее решить - помогите, с меня спасибо:)

Переставить элементы в массиве, чтобы сначала следовали все отрицательные числа, а затем все остальные
Здраствуйте! У меня было такое задание. Дан одномерный массив целых чисел. Переставить элементы в...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru