Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Определить кол-во целых чисел, записанных цифрами в тексте Вводится предложение.Определить кол-во целых чисел, записанных цифрами в тексте. Конец предложения точка. Жду помощи https://www.cyberforum.ru/ pascal/ thread164290.html Pascal Составить линейную программу, печатающую значение true, если указанное высказывание является истинным, и false — в противном случае.
Помогите решить плиз, очень надо, заранее огромное спасибо. Тока пишите подробно я полный профан в программировании. 1 Составить линейную программу, печатающую значение true, если указанное высказывание является истинным, и false — в противном случае. Среди чисел а, b, с есть хотя бы одна пара взаимно противоположных. 2 ((cos*x)/(п-x))+15*x*cos(x*y)-3 Вообщем сначала дробь косинус х делят на...
Pascal Множества Если кто может, помогите, пожалуйста еще с одной задачей, никак не могу справиться сама. Заранее спасибо Дан текст, состоящий из арифметических выражений и слов. Подсчитать количество арифметических выражений не содержащих переменных и функций. (С помощью множеств) https://www.cyberforum.ru/ pascal/ thread164254.html Pascal Табулирование функции. https://www.cyberforum.ru/ pascal/ thread164249.html
Найти сумму y =ΣF1/F2, где а ≤ х ≤ b, х меняется с шагом h = c. Задачу решить используя цикл WHILE. F1= ln |3x - x^2| , F2= 2x^3 - tg x , a=0,5, b=4,5, c=0,3. Добавлено через 28 минут Некто незнает? :(
Pascal Найти минимальный элемент побочной диагонали
Дан массив А(8;8)...Найти минимальный элемент побочной диагонали Сори он не одномерный Если можно,и кому не в падлу алгаритм составить бы :(
Pascal Даны два массива. Сравнить множество их значений. Помогите, пожалуйста составить программу: Даны два массива. Сравнить множество их значений. Используя необходимые процедуры из списка • ввода с клавиатуры числового множества • ввода с клавиатуры числового массива • вывода числового множества на экран • вывода числового массива на экран • вычисления количества элементов множества символов • вычисления количества элементов числового... https://www.cyberforum.ru/ pascal/ thread164218.html
Pascal найти максимальное значение и его индекс Добрые люди помогите решить задание. Напишите алгоритм на языке блок-схем и на языке паскаль. задание для работы. задан массив а,содержащий n чисел. найти значение и индекс максимального элемента. https://www.cyberforum.ru/ pascal/ thread164214.html Pascal найти найбольшие элементы
найти найбольшие элементы каждой строки матрицы х (10;20)и записать их в массив у.
Pascal Разработка программы последовательной структуры с вводом-выводом данных https://www.cyberforum.ru/ pascal/ thread164195.html
Написать и отладить программу, выводящую на экран по два окна с эффектом тени (тень окрасить в черный цвет) для трех различных формул (арифметические выражения). На экране должны быть сформированы записи, поясняющие работу программы. Для ввода очередного набора данных курсор должен перемещаться в соответствующее окно (среднее в каждой строке), а результат вычисления помещаться в крайнее окно....
Pascal вычислить сумму членов ряда https://www.cyberforum.ru/ pascal/ thread164185.html
вычислить сумму членов ряда z=cosx+cos2x/4+cos3x/9+...+cosnx/n^2 с точностью до члена ряда, меньшего е
Pascal графика в паскале загрузка неполучаеться
Помогите с листингом программы надо чтобы было загрузка посредине экрана 219 символом ██████████████████ а тут проценты как можно это воплотить????
Pascal Найти в строке первое слово, начинающееся и заканчивающееся на согласную букву https://www.cyberforum.ru/ pascal/ thread164173.html
В заданной строке найти первое слово, начинающее и заканчивающееся на согласную букву.
0 / 0 / 1
Регистрация: 20.01.2010
Сообщений: 19
0

количество нечетных элементов массива - Pascal - Ответ 946498

08.09.2010, 10:23. Показов 1757. Ответов 5
Метки (Все метки)

Author24 — интернет-сервис помощи студентам
Помогите пожалуйста сделать задачу!!!
Найти количество нечетных элементов массива является ли колво остальных элементов массива нечетным числом

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Program mas; uses crt;
var m:array [1..40] of integer;
h,p,n,i:integer;
begin
clrscr;
writeln('введите количество элементов массива');
read (n); p:=0; h:=0;
for i:=1 to n do
m[i]:=0;
for i:=1 to n do
if (i mod 2)= 1 THEN p:=p+1 else
h:=h+1;
if (h mod 2)= 1 THEN writeln ('количество оставшихся элементов нечетных') else
writeln ('количество оставшихся элементов четных');
writeln ('количество нечетных элеметов,' ' ,p);
readkey;
end.


Вернуться к обсуждению:
количество нечетных элементов массива Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
08.09.2010, 10:23
Готовые ответы и решения:

Найти количество нечетных элементов массива
Найти количество нечетных элементов массива.

Найти количество всех нечетных элементов массива
Найти количество всех нечетных элементов массива а(10)

Определить количество нечетных и отрицательных элементов массива
Помогите пожалуйста, буду благодарен! 1.Дан массив. Определить количество нечетных и отрицательных...

Посчитать количество четных и нечетных элементов одномерного массива
Дан одномерный массив n-количества посчитать количество четных и нечетных элементов если...

5
08.09.2010, 10:23
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
08.09.2010, 10:23
Помогаю со студенческими работами здесь

Найти сумму и количество нечетных по значению элементов одномерного массива
1. Найти сумму и количество нечетных по значению элементов одномерного массива. 2.Сколько в...

Вычислить количество четных и нечетных элементов массива целых чисел
вычислить количество четных и нечетных элементов массива целых чисел

Дан массив A размерностью М, подсчитать количество нечетных элементов массива
помогите решить задачу пожалуйста

Найти количество элементов массива, равных 5 и стоящих на нечётных номерах
Дан массив из 100 целых чисел. Найти количество элементов равных 5 и стоящих на нечетных номерах

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru