Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
danniel
0 / 0 / 0
Регистрация: 07.10.2014
Сообщений: 25
1

Вычислить максимальный эл-т массива и сумму эл-тов массива, расположенных до последнего положительного эл-та

30.10.2014, 07:26. Просмотров 872. Ответов 3
Метки нет (Все метки)

В одномерном массиве, состоящем из n вещественных элементов, вычислить максимальный элемент массива и сумму элементов массива, расположенных до последнего положительного элемента.
0
Лучшие ответы (1)
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
30.10.2014, 07:26
Ответы с готовыми решениями:

Вычислить сумму целых частей элементов массива, расположенных после последнего отрицательного элемента
Необходимо вычислить сумму целых частей элементов массива, расположенных после последнего...

В одномерном массиве вычислить: максимальный элемент массива и сумму элементов массива, расположенных до последнего положительного элемента
Не могу найти ошибку В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1....

Матрица динамическая. 1. максимальный элемент массива; 2. сумму элементов массива, расположенных до последнего положительного элемента
Вариант 5 В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1. максимальный...

Максимальный элемент массива и его номер и сумму элементов массива расположенных до последнего положительного элемента
Максимальный элемент массива и его номер и сумму элементов массива расположенных до последнего...

Вычислить сумму элементов массива, расположенных до последнего положительного элемента
Ребят,помогите пожалуйста.) В одномерном массиве, состоящем из n целых элементов, вычислить 1....

3
D1973
Модератор
4200 / 3021 / 1453
Регистрация: 21.01.2014
Сообщений: 12,921
Записей в блоге: 3
Завершенные тесты: 1
30.10.2014, 11:24 2
И что не получается?
0
danniel
0 / 0 / 0
Регистрация: 07.10.2014
Сообщений: 25
31.10.2014, 06:49  [ТС] 3
напиши плиз прогу
0
D1973
Модератор
4200 / 3021 / 1453
Регистрация: 21.01.2014
Сообщений: 12,921
Записей в блоге: 3
Завершенные тесты: 1
31.10.2014, 09:55 4
Лучший ответ Сообщение было отмечено danniel как решение

Решение

лови, лодырь
Delphi
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
33
34
35
program Project1;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
 
var n, i, k, summ : integer;
    a    : array of integer;
begin
  write('Enter the number of array elements: ');
  readln(n);
  randomize;
  SetLength(a,n);
  k := 0;
  summ := 0;
  for i := 0 to n - 1 do
   begin
    a[i] := -100 + Random(200);
    writeln(a[i]);
   end;
  for i:= n - 1 downto 0 do
   if a[i] > 0
    then begin
          k := i;
          break;
         end;
  writeln('');
  writeln('Last positive element of array = ', a[k], ' on position ', k + 1);
  for i:= 0 to k - 1 do
   summ := summ + a[i];
  writeln('Summ of the elements until the last positive element = ', summ);
  writeln('Press Enter to exit...');
  readln;
end.
1
Миниатюры
Вычислить максимальный эл-т массива и сумму эл-тов массива, расположенных до последнего положительного эл-та  
31.10.2014, 09:55
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
31.10.2014, 09:55

Вычислить сумму элементов массива, расположенных до последнего положительного элемента
Помогите пожалуйста написать: 1)В одномерном массиве, состоящем из 20 вещественных элементов...

Вычислить сумму элементов массива, расположенных до последнего положительного элемента
В одномерно массиве, состоящем из n вещественных элементов, вычислить сумму элементов массива...

Вычислить сумму элементов массива, расположенных до последнего положительного элемента
В одномерном массиве, состоящем из n вещественных элементов, вычислить: 1. максимальный элемент...


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

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

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