Павел
Павел

Подсчитать кол-во отрицательных элементов массива с номерами позиций кратных трем. (Pascal)

до завтра горит напишите полностью!

ДК
Дарья Крылова

k:=0;
for i:=1 to n do
if (i mod 3 =0) and (a [ i ] < 0) then inc(k);

Юлия
Юлия

сколько элементов в массиве? или задается пользователем? могу написать если что.

ТН
Татьяна Нефедова

не буду писать типа - отпиши на мыло а потом ...(делают так - потом $ требуют)
а хочу посоветовать очень полезный сайт по паскалю ПаскальГУРУ (вбейте в гугл ПаскальГУРУ) есть много готовых и бесплатных решений

Похожие вопросы
дан массив из 5 элементов. найти сумму всех кратных трем.
Как найти кол-во различных элементов массива? Pascal
C# номер элемента массива
Найти среднее арифметическое отрицательных элементов этого массива
Как исключить одинаковые элементы в массиве на языке Pascal??
Расположите в порядок убывания отрицательные элементы массива, кратные заданному числу.
в массиве а содержащем 15 элементов подсчитать количество элементов лежащих в диапозоне. (b
вычислите количество элементов массива A(n) кратных 3. элемент массива ввести с клавиатуры.
заменить положительные элементы массива матрицы их целыми частями а отрицательные их модулями (Pascal)
в двумерном числовом массиве найти количество не отрицательных элементов. на Pascal