Форум программистов, компьютерный форум, киберфорум
Наши страницы

Turbo Pascal

Войти
Регистрация
Восстановить пароль
 
Takedo2010
0 / 0 / 0
Регистрация: 10.10.2013
Сообщений: 15
#1

Дан одномерный массив AN. Найдите количество и сумму элементов, индексы которых лежат в интервале - Turbo Pascal

28.10.2013, 02:01. Просмотров 706. Ответов 2
Метки нет (Все метки)

Пожалуйста помогите!))
(Паскаль) Дан одномерный массив AN. Найдите количество и сумму элементов, индексы которых лежат в интервале [ab]
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
28.10.2013, 02:01
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Дан одномерный массив AN. Найдите количество и сумму элементов, индексы которых лежат в интервале (Turbo Pascal):

Дан одномерный массив. Найти сумму элементов, значения которых не превышают 20 - Pascal
Люди, помогите пожалуйста решить. срочно. 1)Дан одномерный массив. Все его элементы: А)увеличить в два раза; Б)уменьшить...

Дан массив целых чисел. найдите сумму положительных элементов,значения которых меньше 10 - Turbo Pascal
Дан массив целых чисел. найдите сумму положительных элементов,значения которых меньше 10

Дан одномерный массив, который содержит не более 50 целых чисел. Найти сумму элементов, у которых последняя цифра больше данного числа Х - Pascal
Дан одномерный массив, который содержит не более 50 целых чисел. Найти сумму элементов, у которых последняя цифра больше данного числа Х

Дан одномерный массив натуральных чисел.Определить сумму элементов массива,сумма цифр которых кратна 3.Все вспомогательные алгоритмы оформить в отдель - Pascal
Дан одномерный массив натуральных чисел.Определить сумму элементов массива,сумма цифр которых кратна 3.Все вспомогательные алгоритмы...

Одномерный массив. Найти произведение 3-х элементов, значение которых. заключены на интервале [А, В] и кратны 3 или 5 - Pascal
Дан массив X(N). Найти произведение 3-х элементов, значение которых. заключены на интервале и кратны 3 или 5.

Дан массив а, состоящий из n элементов. Найдите сумму a1 + 2!a2 + 3!a3 + … + n!an - Pascal
Помогите! Дан массив а, состоящий из n элементов. Найдите сумму a1 + 2!a2 + 3!a3 + … + n!an.

2
ildwine
Модератор
2907 / 1759 / 636
Регистрация: 04.03.2013
Сообщений: 4,371
Записей в блоге: 1
28.10.2013, 07:31 #2
Лучший ответ Сообщение было отмечено автором темы, экспертом или модератором как ответ
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
var
  m : array[1..100] of integer;
  n, i, k : byte;
  a, b, s : integer;
begin
  k := 0;
  s := 0;
  randomize;
  repeat
    write('введите n: ');
    readln(n)
  until (n > 0) and (n <= 100);
  writeln('исходный массив:');
  for i := 1 to n do
  begin
    m[i] := random(50) - 25;
    write(m[i]:4)
  end;
  writeln;
  repeat
    write('введите a и b:');
    readln(a, b)
  until (a >= 1) and (a <= n) and (b >= a) and (b <= n);
  for i := a to b do
  begin
    inc(k);
    s := s + m[i]
  end;
  writeln('сумма = ', s);
  writeln('количество = ', k);  
  readln
end.
1
Takedo2010
0 / 0 / 0
Регистрация: 10.10.2013
Сообщений: 15
28.10.2013, 14:07  [ТС] #3
огромное человеческое спасибо)))
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.10.2013, 14:07
Привет! Вот еще темы с ответами:

Дан массив А(5). найдите сумму и колличество положительных элементов - Pascal
Дан массив А(5). найдите сумму и колличество положительных элементов. Как это решить??? Заранее огромное спасибо!!!!

Дан целочисленный массив с количеством элементов N. Вывести те его элементы, индексы которых являются степенями двойки. (2,4,8,16,…). - Turbo Pascal
Дан целочисленный массив с количеством элементов N. Вывести те его элементы, индексы которых являются степенями двойки. (2,4,8,16,…).

Дан одномерный массив, найти 5 соседних элементов, сумма которых максимальна - Turbo Pascal
дан одномерный массив, найти 5 соседних элементов сумма которых максимальна

Дан одномерный массив чисел. Подсчитать в нем количество элементов равных нулю, отрицательных элементов и положительных элементов - Turbo Pascal
1)из заданной строки напечатать только заглавные английские буквы и их коды 2)Дан одномерный массив чисел. Подсчитать в нем количество...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru