14.06.2010, 15:57 | #1 (permalink) |
Новичок
Регистрация: 15.04.2010
Сообщений: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Помогите с массивами в TP
|
14.06.2010, 15:57 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Внимательно прочитайте содержимое этих тем Помогите с двумерными массивами. C++ Задача с массивами Помогите с массивами |
14.06.2010, 16:11 | #2 (permalink) |
一步一步地会到目的
Регистрация: 09.05.2009
Адрес: Черноземье
Сообщений: 10,939
Записей в дневнике: 10
Сказал(а) спасибо: 140
Поблагодарили 80 раз(а) в 33 сообщениях
Репутация: 28362
|
А почему бы не попробовать самому составить алгоритм, попытаться решить? А мы тогда подскажем, что непонятно или не получается. Это и есть помощь
|
14.06.2010, 20:07 | #3 (permalink) |
Новичок
Регистрация: 15.04.2010
Сообщений: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
друг,у меня это займет уйму времени,я понимаю суть задачи и могу составить ее алгоритм,но на TP ее написать затрудняюсь...сдавать нужно уже после завтра...
|
14.06.2010, 21:03 | #4 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
А интересно, какое минимальное количество членов массива предполагает "монотонное убывание"? Два? Три? Больше? Как задается массив? Какой тип данных?
|
14.06.2010, 21:42 | #5 (permalink) |
Новичок
Регистрация: 15.04.2010
Сообщений: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
тип данных любой,если что сам подредактирую,убывание от двух и более...массив можно задать самому,можно и рандомом...без разницы)
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
14.06.2010, 22:16 | #6 (permalink) |
Специалист
Регистрация: 27.08.2008
Адрес: Санкт-Петербург
Сообщений: 27,807
Сказал(а) спасибо: 340
Поблагодарили 583 раз(а) в 208 сообщениях
Репутация: 113184
|
Тогда, например, так:
Код:
CONST N=100; VAR A:ARRAY[1..N] of WORD; i:INTEGER; Num,p:BYTE; b:Boolean; BEGIN RANDOMIZE; For i:=1 to N do begin A[i]:=RANDOM(1000); Write(A[i]:4); end; WriteLn; Num:=0; i:=1; Repeat b:=true; p:=0; Repeat INC(i); If A[i]<A[i-1] then begin b:=false; p:=1; end else b:=true; Until b or (i=N); If p=1 then INC(Num); Until i=N; WriteLn('The number od "falling" sections is ',Num); ReadLn; END. |
14.06.2010, 23:09 | #8 (permalink) |
Новичок
Регистрация: 15.04.2010
Сообщений: 10
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
усе,доработал,теперь в массиве сам задаю N))))спасибо,сам бы реально много времени потратил бы...)))
|
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|