Вычислить количество элементов одномерного массива a, таких что a(i-1)<a(i)<a(i+1). (Turbo Pascal) - Помощь студентам

Инквизитор · 21.05.2014, 18:45

Помогите, пожалуйста, написать программу.
Вычислить количество элементов одномерного массива a, таких что a(i-1)<a(i)<a(i+1). Желательно полностью всю программу, если можно)
Заранее спасибо.

ZX Spectrum-128 · 21.05.2014, 18:52

А реально от вас увидеть хоть какие-то попытки решения задачи?

Инквизитор · 21.05.2014, 18:55

К сожалению, нет(

ZX Spectrum-128 · 21.05.2014, 19:01

К сожалению, только часть программы.

Код:

k:=0;
for i:=2 to n-1 do
  if (a[i]>a[i-1]) and (a[i]<a[i+1]) then
    k:=k+1;

Bugrimov · 21.05.2014, 19:16

Инквизитор язык программирования какой - паскаль?

Инквизитор · 21.05.2014, 19:46

Да, Turbo Pascal

ZX Spectrum-128 · 21.05.2014, 20:18

Вам осталось описать переменные, заполнить массив и вывести количество.

21.05.2014, 18:45	#1
Инквизитор Новичок Джуниор Регистрация: 21.05.2014 Сообщений: 3	Вычислить количество элементов одномерного массива a, таких что a(i-1)<a(i)<a(i+1). (Turbo Pascal) Помогите, пожалуйста, написать программу. Вычислить количество элементов одномерного массива a, таких что a(i-1)<a(i)<a(i+1). Желательно полностью всю программу, если можно) Заранее спасибо.

21.05.2014, 19:01	#4
ZX Spectrum-128 Участник клуба Регистрация: 05.11.2013 Сообщений: 1,601	К сожалению, только часть программы. Код: `k:=0; for i:=2 to n-1 do if (a[i]>a[i-1]) and (a[i]<a[i+1]) then k:=k+1;`

21.05.2014, 19:16	#5
Bugrimov C/C++, Java Участник клуба Регистрация: 28.03.2012 Сообщений: 1,679	Инквизитор язык программирования какой - паскаль? "Keep it simple" - придерживайтесь простоты! Уильям Оккам - "Не следует множить сущее без необходимости" Сложность - враг простоты и удобства!

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Как обнулить элементы строки двумерного массива, содержащей наибольшее количество элементов одномерного массива	griignat	Помощь студентам	1	22.11.2011 20:04
D(3,5)/ НАйти минимум элементов массива Turbo Pascal	Poor_Student	Помощь студентам	4	16.06.2010 00:37
Turbo Pascal. Формирование и обработка одномерного массива	мирЗвонка	Помощь студентам	2	04.11.2009 12:17
вычислить количество элементов массива, лежащих в диапазоне от А до В	Gigatrest	Паскаль, Turbo Pascal, PascalABC.NET	16	26.01.2009 14:05

21.05.2014, 18:52	#2
ZX Spectrum-128 Участник клуба Регистрация: 05.11.2013 Сообщений: 1,601	А реально от вас увидеть хоть какие-то попытки решения задачи?

21.05.2014, 18:55	#3
Инквизитор Новичок Джуниор Регистрация: 21.05.2014 Сообщений: 3	К сожалению, нет(

21.05.2014, 19:46	#6
Инквизитор Новичок Джуниор Регистрация: 21.05.2014 Сообщений: 3	Да, Turbo Pascal

21.05.2014, 20:18	#7
ZX Spectrum-128 Участник клуба Регистрация: 05.11.2013 Сообщений: 1,601	Вам осталось описать переменные, заполнить массив и вывести количество.