сервис вопросов и ответовPascal ABC найти количество пар соседних элементов массива, в которых предыдущий элемент меньше последующего
5-9 класс|
|
Ortasa
04 сент. 2014 г., 21:11:36 (9 лет назад)
Dima2505
04 сент. 2014 г., 21:46:56 (9 лет назад)
uses crt;
var a:array [1..100] of byte;a, k,i,n:byte;
begin
read(i); a:=0;
for k:=1 to i do begin
read(n);
a[k]:=n;
end;
for k:=1 to i-1 do
if a[k]<a[k+1] then a:=a+1;
write(a);
end.
Ответить
Другие вопросы из категории
Клиент внёс в банк Х рублей.Каждый месяц эта сумма увеличивается на Р процентов.
Сколько будет у клиента денег через два месяца,три месяца,через полгода?
Читайте также
СРОЧНО НАДО 1.Заменить первый отрицательный элемент нулем 2.Умножить все элементы, кратные трем, на третий элемент массива 3.Из
элементов массива Р сформировать массив М того же размера по правилу: если номер четный , то Рi=i*Mi, если нечетный, то Рi=-Mi
Массив В задан случайным образом а) подсчитать сумму элементов массива, меньших своего номера; б) подсчитать сумму элементов массива, стоящих на четных
местах; в) подсчитать сумму отрицательных элементов массива; г) подсчитать сумму элементов массива, больших произвольного числа К. помогите, пожалуйста
Заполните массив с клавиатуры целыми числами и найдите сумму элементов массива с i1-го по i2-й (i1 и i2 вводить с клавиатуры).
Входные данные:
в первой строке целое число n (0 < n ≤ 100) - кол-во элементов в массиве и целые числа i1 и i2 (0 < i1, i2 ≤ 100). Во второй строке целые числа Х1, Х2,..,Хn разделенные пробелом (числа по модулю не превосходят 32000) - значения элементов массива.
Выходные данные:
сумма элементов массива c номерами от i1 до i2.
(Написать программу на Паскале)
1) Все положительные элементы массива А увеличить на 0.4, нулевые заменить на 0.5, определить сумму отрицательных элементов и произведение
положительных элементов.
2)Найти количество пар взаимообратных соседних чисел в линейной таблице Х[1:N].
3)Упорядочите элементы массива А в порядке убывания.
4)При поступлении в институт абитуриенты набирают определенное количество баллов. Считая фамилии абитуриентов и набранное ими количество баллов исходными данными, составить список будущих студентов, если известно что на выбранный факультет будет зачислено М человек.
Вы находитесь на странице вопроса "Pascal ABC найти количество пар соседних элементов массива, в которых предыдущий элемент меньше последующего", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.