Напишите программу для обработки одномерного массива. В программе должны быть следующие подпрограммы:

07.05.2013, 16:55. Показов 855. Ответов 0

Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам

Напишите программу для обработки одномерного массива. В программе должны быть следующие подпрограммы:
1. Заполнение массива случайными числами [1;100]
2. Сортировка массива методом прямого выбора
3. Вывод массива
4. Поиск минимума среди четных элементов

Как-то не работает, помогите исправить, пожалуйста:

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
const n=4;
type mas=array[1..n] of integer;
var a:mas;  min:integer;
 
procedure zap( Var a2:mas);
var i:integer;
begin
for i:=1 to n do
begin
a2[i]:=random(100)+1;
writeln(a2[i], ' ');   end;
end;
 
procedure cort( Var a1:mas);
var k,i,j:integer;x:real;
begin
for i:=1 to n-1 do
begin
min:=i;
for j:=i+1 to n do
if a[j]<a[min] then
begin
min:=j;
k:=a[i];
a[i]:=a[min];
a[min]:=k;
 end;
for i:=1 to n do
writeln(a1[i]) ;
end;  end;
 
procedure vvd( Var a3:mas);
var i:integer;
begin
for i:=1 to n do
writeln(a3[i],' ');
end;
 
procedure minimal (Var a4:mas);
var i,min:integer;
begin
min :=a4[1];
for i:=1 to n do
if i mod 2=0 then
if a4[i]<min then
min:=a4[i];
writeln(min);
end;
 
begin
writeln(' заполнение :');
zap(a);
writeln('сортировка :');
cort(a);
writeln('вывод:');
vvd(a);
writeln('минимум среди четных элементов:');
minimal(a);
  end.

Programming

Эксперт

39485 / 9562 / 3019

Регистрация: 12.04.2006

Сообщений: 41,671

Блог

07.05.2013, 16:55

Ответы с готовыми решениями:

Найти наибольший элемент массива, следующие пункты должны быть размещены в порядке убывания
A (10) одномерный массив. Найти наибольший элемент массива, следующие пункты должны быть размещены в порядке убывания. Помогите:))

Напишите программу для двумерной обработки массива
Write a program for two-dimensional array processing that implements the following activities: 1. creates one of these special arrays...

Разработать программу для обработки одномерного динамического массива
Разработать программу для обработки одномерного динамического массива. Выполнить операции - ввод значений с клавиатуры - генрация...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

inter-admin

Эксперт

29715 / 6470 / 2152

Регистрация: 06.03.2009

Сообщений: 28,500

Блог

07.05.2013, 16:55

Помогаю со студенческими работами здесь

Разработать алгоритм и программу с единственным циклом для обработки одномерного массива
При заданных элементах X1 , X2 ... Xn и четном n значения сумм С (n/2)(i=1) Xi , D (n)(i=n/2+1)

Напишите программу, которая для одномерного целочисленного массива подсчитывает частоту вхождения элементов
Задание: Напишите программу, которая для одномерного целочисленного массива подсчитывает частоту вхождения элементов. На выходе должен...

Напишите основные элементы, которые должны быть на дискете для того, чтобы она была системной?
Напишите основные элементы, которые должны быть на дискете для того, чтобы она была системной?

Напишите подпрограммы для вставки и удаления элементов массива, а также подпрограммы для поиска min и max элементов
Напишите подпрограммы для вставки и удаления элементов массива, а также подпрограммы для поиска минимального и максимального элементов...

Написать программу, которая выполняет следующие действия одномерного массива:
1) позволяет вводить массив; 2) выполняет преобразование массива: Записать в отдельный массив элементы, которые превосходят среднее...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Очистка реквизитов документа при копировании Maks 09.04.2026 Алгоритм из решения ниже применим как для типовых, так и для нетиповых документов на самых различных конфигурациях. Задача: при копировании документа очищать определенные реквизиты и табличную. . .	модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий anaschu 08.04.2026 https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI	Блокировка документа от изменений, если он открыт у другого пользователя Maks 08.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .	Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка. Hrethgir 08.04.2026 Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов. anaschu 08.04.2026 работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ	Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики. Hrethgir 07.04.2026 Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .	Горе от ума kumehtar 07.04.2026 Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .	Использование значений реквизитов справочника в документе, с определенными условиями и правами Maks 07.04.2026 1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .

Наверх