Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Kazipulia
0 / 0 / 0
Регистрация: 22.11.2012
Сообщений: 13
1

Поиск третьего минимального числа массива

22.11.2012, 23:53. Просмотров 825. Ответов 1
Метки нет (Все метки)

Массив состоит из 10 чисел
Числа выбираются случайно от -10 до 10
Желательно чтобы программа была написана очень просто
Заранее спасибо
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
22.11.2012, 23:53
Ответы с готовыми решениями:

Поиск третьего минимального значения массива
Массив из 10 чисел Числа выбираются случайно от -10 до 10 Программа должна...

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

Поиск минимального элемента массива
в массиве хранится информация о стоимости 1 кг 20 видов конфет. определить...

Поиск максимального и минимального элемента массива
поиск максимального и минимального элемента с помощью массива!

Поиск максимального и минимального значения двумерного массива
Почему-то не срабатывает поиск минимального значения. Но когда вычисляю только!...

1
orange_rush
140 / 146 / 116
Регистрация: 15.11.2012
Сообщений: 529
Записей в блоге: 2
23.11.2012, 11:11 2
Лучший ответ Сообщение было отмечено Kazipulia как решение

Решение

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
const n=10;{здесь можно менять размер массива}
var
        a: array[1..n]of integer; {массив из 10 целых чисел}
        i,j: integer;{в роли счётчиков}
        temp: integer;{для организации сортировки}
 
begin
        write('исходный массив: ');
        for i:=1 to 10 do begin {счётчик сработает 10 раз}
                a[i]:=random(21)-10; {создаст 10 случайных чисел и разместит их в массиве}
                write(a[i],' ');{и выведет их на экран}
        end;
        writeln;
        {далее следует классическая сортировка "пузырьком"}
        for i:=1 to n-1 do
                for j:=1 to n-i do
                        if a[j]>a[j+1] then begin
                                temp:=a[j];
                                a[j]:=a[j+1];
                                a[j+1]:=temp;
                        end;
        {в отсортированном по возрастанию массиве выводим на экран 3-й элемент}
        write('3-й минимальный элем ент = ');
        writeln(a[3]);
        readln;
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
23.11.2012, 11:11

Поиск максимального и минимального элемента массива(с существенным дополнением)
Дан массив целых чисел. Найти в этом массиве минимальный элемент N и...

Найти номер и значения третьего четного числа
Дано 10 чисел найти номер и значения третьего четного числа. Используя любой...

Найти значение третьего положительного элемента массива
алгоритм, который находит и выводит значение 3-го положительного элемента...


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

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

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