сервис вопросов и ответовПомогите плз с Паскалем.... 1)Посчитать ссреднее арифметическое элементов массива. 2) Посчитать сумму x+x^2+x^3+....x^n 3)В массиве определить кол-во
5-9 класс|
|
элементов не больше заданного C
шуана2004
04 марта 2017 г., 12:56:39 (7 лет назад)
Mashaponomarenko2004
04 марта 2017 г., 13:54:23 (7 лет назад)
1)
Const
n=10;
Var
a:array [1..n] of integer;
i,max:integer;
begin
Write('Введите массив: ');
For i:=1 to n do
Read(a[i]);
Readln;
max:=a[1];
For i:=1 to n do
If a[i]>max
Then
max:=a[i];
Writeln('Максимальный элемент - ',max);
Readln;
end.
2) хз....
3)
const
n = 100;
var
arr: array[1..n] of integer;
i, m, qty: byte;
begin
write('Количество элементов массива: ');
readln(m);
write('Элементы массива через пробел: ');
for i:=1 to m do
read(arr[i]);
readln;
qty := 0;
i := 2;
while i < m do
if (arr[i] > arr[i-1]) and (arr[i] > arr[i+1]) then begin
qty := qty + 1;
i := i + 2
end
else
i := i + 1;
writeln('Кол-во элементов, которые больше соседей: ', qty);
readln;
end.
Вроде как-то так
Ответить
Другие вопросы из категории
Помогите перевести числа из одной системы в другую. В скобочках указана система)
11010(2) = ? (10)
10001111(2) = ?(10)
99(10) = ?(2)
99(10) = ?(8)
99(10) = ?(16)
шестиклассники аня, боря, вася. галя, даша и иван получили в подарок флешки на 1, 2, 4, 8, 16 и 32 гб. Выясните кто из ребят получил флешку самого больш
ого и кто - самого маленького объёма. если известно следуещее: у ани объм флэшки меньше, чем у бори; у васи больше, чем у гали; у даши меньше, чем у ивана; у васи меньше, чем у ани; у даши больше, чем у бори.
Читайте также
ПОМОГИТЕ!!!удалить элемент линейного массива вещественных чисел, которые меньше среднего арифметического элемента массива.если таких элементов несколько ,
удалить последний из найденных.Помогите решить в паскале.(вычислить средн.ариф.номер э-та,....)
Проблема с Паскалем. Мне надо посчитать среднее арифметическое всех отрицательных чисел в массиве из десяти элементов. Я понимаю, как сначала надо
распредилить, какие числа меньше нуля, но как вычислить среднее арифметическое, не зная точное кол-во отрицательных элементов? Желательно написать полной программой. Заранее спасибо с:
Помогите!Очень нужно)))
В строке символов определить кол-во букв А.
Нужно составить программу на Паскале))
Ребятки помогите плз 75 баллов дам!!!!
помогите написать программу в паскале.
а-3х значное число с клавиатуры. если оно перевёртыш печатать "да" если иначе "нет"
спасибо,
Вы находитесь на странице вопроса "Помогите плз с Паскалем.... 1)Посчитать ссреднее арифметическое элементов массива. 2) Посчитать сумму x+x^2+x^3+....x^n 3)В массиве определить кол-во", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.