Программа с модулями, никак не могу сделать

@Адлвдылжыв · Регистрация: 26.05.2017

Студворк — интернет-сервис помощи студентам

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

@Puporev · 26.05.2017, 10:08

Сообщение от Адлвдылжыв

никак не могу сделать

Покажи что уже сделал, товарищ "абырвалг"

@Адлвдылжыв · 26.05.2017, 10:10 **[ТС]**

Я нечего не сделал, не знаю с чего начать...

@Адлвдылжыв · 26.05.2017, 10:20 **[ТС]**

Поможете хоть чем-то, или самому пытаться делать??)

@JuriiMW · 26.05.2017, 10:20

Сообщение от Адлвдылжыв

не знаю с чего начать

Открыть любой букварь по ЯП и прочитать не пробовали?

@JuriiMW · 26.05.2017, 10:20

Там даже примеры бывают… ;–)

@Адлвдылжыв · 26.05.2017, 10:26 **[ТС]**

JuriiMW, я все конечно понимаю, мне просто очень срочо нужна решенная задача

@JuriiMW · 26.05.2017, 10:47

Не по теме:

Срочность работ и другие причины не являются основанием для их нарушения.

@Адлвдылжыв · 26.05.2017, 10:50 **[ТС]**

Puporev, ну так, что поможете?

magirus · 26.05.2017, 11:23

а ты еще не понял что пока ты не начнешь что то делать то никто тебе "помогать" не собирается

@Адлвдылжыв · 26.05.2017, 11:25 **[ТС]**

magirus я вас понял супер-модератор

@JuriiMW · 26.05.2017, 11:30

Адлвдылжыв, помочь то поможем.
Только вам от этого легче не станет… Ибо, ещё ведь сдать нужно будет!

P.S. Не устаю приводить ссылку: http://bash.im/quote/402378

Программа:

Pascal
1
2
3
4
5
6
7
8
uses array2;
begin
  var n := ReadLnInteger('n =');
  var a := ArrRandomInteger(n,-10,+10);
  a.Println;
  WriteLn(zeros(a));
  WriteLn(afterMin(a));
end.

Ну и модуль:

Pascal
1
2
3
4
unit array2;
function zeros(a : array of Integer) := a.Where(i->i=0).Count;
function afterMin(a : array of Integer) := a.Where((i,p)->p>a.LastIndexMin).Sum;
end.

Новые блоги и статьи Все статьи Все блоги /
Подключение Box2D v3 к SDL3 для Android: физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .	Загрузка PNG с альфа-каналом на SDL3 для Android: с помощью SDL3_image 8Observer8 27.01.2026 Содержание блога SDL3_image - это библиотека для загрузки и работы с изображениями. Эта пошаговая инструкция покажет, как загрузить и вывести на экран смартфона картинку с альфа-каналом, то есть с. . .
Влияние грибов на сукцессию anaschu 26.01.2026 Бифуркационные изменения массы гриба происходят тогда, когда мы уменьшаем массу компоста в 10 раз, а скорость прироста биомассы уменьшаем в три раза. Скорость прироста биомассы может уменьшаться за. . .	Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android 8Observer8 26.01.2026 Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .	Установка Android SDK, NDK, JDK, CMake и т.д. 8Observer8 25.01.2026 Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .	Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf 8Observer8 25.01.2026 Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8

	Программа с модулями, никак не могу сделать 26.05.2017, 10:01. Показов 600. Ответов 11 Метки нет (Все метки) В одномерном массиве, состоящем из n действительных элементов, вычислить: 1) количество элементов массива, равных 0; 2) сумму элементов массива, расположенных после минимального элемента. 0

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8
	26.05.2017, 10:10 [ТС]
	Я нечего не сделал, не знаю с чего начать... 0

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8
	26.05.2017, 10:20 [ТС]
	Поможете хоть чем-то, или самому пытаться делать??) 0

@JuriiMW 5095 / 2661 / 2355 Регистрация: 10.12.2014 Сообщений: 10,059
	26.05.2017, 10:20
	Там даже примеры бывают… ;–) 0

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8
	26.05.2017, 10:26 [ТС]
	JuriiMW, я все конечно понимаю, мне просто очень срочо нужна решенная задача 0

@JuriiMW
	26.05.2017, 10:47
	Не по теме: Срочность работ и другие причины не являются основанием для их нарушения. 0

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8
	26.05.2017, 10:50 [ТС]
	Puporev, ну так, что поможете? 0

magirus Почетный модератор 28049 / 15785 / 983 Регистрация: 15.09.2009 Сообщений: 67,752 Записей в блоге: 78
	26.05.2017, 11:23
	а ты еще не понял что пока ты не начнешь что то делать то никто тебе "помогать" не собирается 0

@Адлвдылжыв 0 / 0 / 0 Регистрация: 26.05.2017 Сообщений: 8
	26.05.2017, 11:25 [ТС]
	magirus я вас понял супер-модератор 0