ПАСКАЛЬ АБС!! 10 КЛАСС! СРОЧНО!! Дан массив А(n). Определите кол-во нечетных элементов массива, стоящих на четных местах. Выведите на
10-11 класс
|
экран исходный массив и найденное кол-во.
var n:integer;
begin
for n:1 to n do
begin;
read A[n];
if n mod 2=0 then
if A[n] mod 2=1 then
writeln(A[n]);
end;
end.
Другие вопросы из категории
сокращения одновременного массива путем удаления каждого второго элемента
ограничена).
Программа Delphi
Заранее благодарю!
Читайте также
четных местах. выведите на экран исходный массив и найденное кол-во.
генератора случайных чисел. если можно с блок-схемой
языков программирования алгоритм,позволяющий найти среднее арифметическое нечетных трехзначных чисел,записанных в этом массиве.если ни одного такого числа нет,нужно вывести сообщение об этом.
2)дан целочисленный массив из 30 элементов.элементы массива могут принимать целые значения от 0 до 100.опишите на русском языке или на одном из языков программирования алгоритм,позволяющий найти и вывести произведение элементов массива,которые имеют четное значение и не оканчиваются на 0.
упорядочить по невозрастаниюПрограмма необходима на языке Pascal