в одномерном массиве состоящем из n вещественных частей вычислить:1) номер наибольшего
В одномерном массиве состоящем из n вещественных элементов вычислить:
1) номер наибольшего по модулю элемента массива
2) сумму частей массива, расположенных после первого положительного элемента
Написать нужно программу на паскале. Это 2 условия обязаны быть в одной программке выполнятся. Помогите.
Ева Карус
10 баллов в минутку - хорошая прибыль :D
Добижа
Михаил
В рубли бы ещё перевести :D
Ванек Халачкевич
Ну для чего сходу гнаться"
Борис
По определению, ибо необходимы только для вопросов.
Лепешкевич
Нелли
сделал сам вопрос можно удалить.
1 ответ
Вера Накулина
// PascalABC.NET 3.3, сборка 1561 от 02.11.2017
// Внимание! Если программка не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99).ConvertAll(x-gt;real(x/10));
a.Println;
var imax:=a.Select(x-gt;Abs(x)).ToArray.IndexMax;
var ip:=a.FindIndex(x-gt;xgt;0)+1;
Writeln('Номер наибольшего по модулю элемента: ',imax+1);
Writeln('Сумма частей после первого положительного: ',a[ip:].Sum:0:1)
end.
Пример
n= 13
-5.9 2.8 -8.2 4.8 1.2 -7.3 6.7 4 -5.8 6.4 2.4 -9.3 -8.6
Номер наибольшего по модулю элемента: 12
Сумма элементов после первого положительного: -13.7
// Внимание! Если программка не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-99,99).ConvertAll(x-gt;real(x/10));
a.Println;
var imax:=a.Select(x-gt;Abs(x)).ToArray.IndexMax;
var ip:=a.FindIndex(x-gt;xgt;0)+1;
Writeln('Номер наибольшего по модулю элемента: ',imax+1);
Writeln('Сумма частей после первого положительного: ',a[ip:].Sum:0:1)
end.
Пример
n= 13
-5.9 2.8 -8.2 4.8 1.2 -7.3 6.7 4 -5.8 6.4 2.4 -9.3 -8.6
Номер наибольшего по модулю элемента: 12
Сумма элементов после первого положительного: -13.7
Стефания
не так сделали.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Составить монолог от имени дневника двоечника 7-10 предложений
Русский язык.
Рассматривая литературный язык как сложное взаимодействие книжного языка и разговорного,В.И.Чернышёв горячо
Разные вопросы.
Арабы входят в __________________ групп народов. Местом расселения арабов с незапамятных
Разные вопросы.
Грузовой автомобиль марки краз за одну поездку может доставить 7.500 кирпичей
Математика.
Определить предложения какие они по цели высказывания и по интонации
Русский язык.
"Три толстяка" Называли эту площадь Площадью Звезды последующей причине.
Русский язык.
на одной грядке коротышки посадили 3 ряда морковок по 8 штук
Разные вопросы.
эссе на тему какое образование дается в каждой семье
Қазақ тiлi.
Облако тегов