Информатика | 5 - 9 классы
Написать программу на Паскале для решения следующей задачи : Дан массив из 20 элементов.
Необходимо посчитать количество пар элементов, в которых есть хотя бы 1 нечетный элемент.
Под парой элементов считать 2 рядом стоящих элемента.
Написать программу на языке си + + Дан массив из 10 целочисленных элементов?
Написать программу на языке си + + Дан массив из 10 целочисленных элементов.
Посчитать сумму всех элементов массива.
Дан целочисленный одномерный массив из n - элементов?
Дан целочисленный одномерный массив из n - элементов.
Вывести на экран четные элементы стоящие на нечетных массивов через паскаль.
Написать программу Заполнить массив из 15 элементов случайными числами ( - 20 ; 80) Посчитать сумму всех элементов массива Посчитать количество отрицательных элементов?
Написать программу Заполнить массив из 15 элементов случайными числами ( - 20 ; 80) Посчитать сумму всех элементов массива Посчитать количество отрицательных элементов.
Дан одномерный массив целых чисел состоящий из 22 двух элементов посчитать количество отрицательных элементов массива, а так же количество элементов которые делятся на 9?
Дан одномерный массив целых чисел состоящий из 22 двух элементов посчитать количество отрицательных элементов массива, а так же количество элементов которые делятся на 9.
Помогите отредактировать программу.
Дан целочисленный массив из 10 элементов все элементы которого целые числа в интервале от - 1000 до 1000?
Дан целочисленный массив из 10 элементов все элементы которого целые числа в интервале от - 1000 до 1000.
Напишите программу которая находит количество элементов всех нечетных элементов массива которые делятся на 3 на языке Pascal желательно.
Дан массив из 10 элементов написать программу увеличивающую все элементы на 5?
Дан массив из 10 элементов написать программу увеличивающую все элементы на 5.
В одномерном массиве подсчитать количество пар стоящих рядом нечетных элементов?
В одномерном массиве подсчитать количество пар стоящих рядом нечетных элементов.
1. Вывести ряд чисел 5, 14, 41, 122, 365 учитывая, что первый элемент массива равен 2 3?
1. Вывести ряд чисел 5, 14, 41, 122, 365 учитывая, что первый элемент массива равен 2 3.
Дан целочисленный массив из 20 элементов.
Элементы массива могут принимать целые значения от - 10000 до 10000 включительно.
Напишите программу, позволяющую найти и вывести количество пар элементов, в которых сумма элементов делится на 3, но не делится на 9.
В данной задаче под парой подразумеваются два соседних элемента массива.
Пожалуйста, помогтме решить задачи на Pasсal?
Пожалуйста, помогтме решить задачи на Pasсal.
Во всех задачах массив состоит из 10 элементов и задаётся из интервала от 1 до 99.
1. Написать программу, которая выводит на экран все четные элементы массива и их количество.
2. Написать программу, которая выводит на экран все двузначные элементы массива и их количество.
3. Написать программу, которая выводит на экран сначала все четные элементы, а потом нечетные (по индексу).
. Написать программу, которая выводит на экран сначала все четные элементы, а потом нечетные (по значению).
5. Написать программу, которая выводит на экран количество элементов оканчивающихся на 5.
Написать программу в АВС Паскаль?
Написать программу в АВС Паскаль.
Дан массив целых чисел.
Найти количество пар соседних элементов, в которых одно число четное, а другое отрицательное.
Выведите также сформированный массив и все искомые пары соседних элементов.
Вы открыли страницу вопроса Написать программу на Паскале для решения следующей задачи : Дан массив из 20 элементов?. Он относится к категории Информатика. Уровень сложности вопроса – для учащихся 5 - 9 классов. Удобный и простой интерфейс сайта поможет найти максимально исчерпывающие ответы по интересующей теме. Чтобы получить наиболее развернутый ответ, можно просмотреть другие, похожие вопросы в категории Информатика, воспользовавшись поисковой системой, или ознакомиться с ответами других пользователей. Для расширения границ поиска создайте новый вопрос, используя ключевые слова. Введите его в строку, нажав кнопку вверху.
/ / PascalABC.
NET 3.
1, сборка 1204 от 24.
03. 2016
begin var a : = ArrRandom(ReadInteger('n = '), - 30, 30) ; a.
Println ; var b : = a.
Pairwise.
Where(i - > ; (i.
Item1.
IsOdd) or (i.
Item2.
IsOdd)).
Count ; Writeln('Количество пар = ', b)
end.
Тестовое решение :
n = 15 - 5 7 12 - 11 29 11 - 28 19 20 28 - 6 30 26 - 14 27
Количество пар = 9.
Const n = 20 ;
var a : array[1.
N] of integer ; m, i : integer ;
begin for i : = 1 to n do begin a[i] : = random(21) - 10 ; write(a[i] : 4) ; end ; writeln ; for i : = 1 to n - 1 do if (a[i] mod 2 < ; > ; 0) or (a[i + 1] mod 2 < ; > ; 0) then m : = m + 1 ; writeln('Всего пар', m) ;
end.
Тестовое решение : 2 - 8 8 - 5 7 - 8 - 3 - 6 - 9 2 - 1 - 3 - 8 6 10 7 - 4 - 8 0 - 5
Всего пар 13.