|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
21.01.2009, 23:14 | #1 |
Регистрация: 21.01.2009
Сообщений: 4
|
В массиве Р(10) введенном с клавиатуры поменять местами наибольший и наименьший элементы. Делфи.
Помогите решить пожалуйста в Delphi две задачи на одномерные массивы:
1.В массиве Р(10) введенном с клавиатуры поменять местами наибольший и наименьший элементы. 2. Найти номера пары элементов массива В(20) вводимого с клавиатуры, равноотстоящих от начала и конца массива и имеющих одинаковые значения |
21.01.2009, 23:27 | #2 |
Форумчанин
Регистрация: 11.06.2007
Сообщений: 233
|
var b:array [1..10] of integer;
i,d,max,maxi,mini,min,c:integer; begin randomize; max:=0; min:=32000; for i:=1 to 10 do begin if b[i]>max then begin max:=b[i];maxi:=i; end; end; for i:=1 to 10 do begin if b[i]<min then begin min:=b[i];mini:=i end; end; c:=b[maxi]; b[maxi]:=b[mini]; b[mini]:=c; end; |
21.01.2009, 23:29 | #3 |
Форумчанин
Регистрация: 11.06.2007
Сообщений: 233
|
Это текст кнопки обработки массива. Дкмаю ввести сможеш это просто и вывести потом. Просто Не знаю как ты его вводить будеш спомощью стринггрида или как то по другому
|
22.01.2009, 00:56 | #4 |
Меркантильный кю
Участник клуба
Регистрация: 02.02.2008
Сообщений: 1,001
|
Интуиция подсказывает мне, что проги нужны консольные...
1. Код:
Росли вроде умными, выросли дурнями... (c)А.Васильев
|
22.01.2009, 01:02 | #5 |
Меркантильный кю
Участник клуба
Регистрация: 02.02.2008
Сообщений: 1,001
|
2.
Код:
Росли вроде умными, выросли дурнями... (c)А.Васильев
|
22.01.2009, 05:21 | #6 | |
delphi-ст!
Форумчанин
Регистрация: 02.01.2009
Сообщений: 825
|
Имхо...
Цитата:
вступлю в команду разработчиков ПО на Delphi
Последний раз редактировалось maladoy; 22.01.2009 в 05:45. |
|
23.01.2009, 11:52 | #7 |
Регистрация: 21.01.2009
Сообщений: 4
|
спасибо большое))
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Как поменять местами в массиве max и min элемент. | Stager | Общие вопросы C/C++ | 2 | 13.01.2009 02:03 |
Задача по матрицам. Поменять местами наименьший и второй по величине элементы | Иван 883 | Паскаль, Turbo Pascal, PascalABC.NET | 5 | 03.01.2009 16:04 |
Ввести двумерный массив и поменять в нём местами элементы | Ku6ep | Помощь студентам | 3 | 23.12.2008 18:25 |
в двумерном массиве целых чисел поменять местами стороки и столбы с одинаковыми номерами. | Lilu | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 03.04.2008 16:27 |
в двухмерном массиве поменять местами столбцы с максимальным и минимальным элементами | Лёха | Помощь студентам | 5 | 18.12.2007 18:12 |