Написать программу, которая формирует случайным образом массив из N целых чисел, лежащих в диапазоне от 1 до 5, после чего на экран выводится сам
5-9 класс
|
массив и номера элементов, совпадающих с первым элементом
const
N = 5;
var
a: array [1..N] of integer;
i: integer;
begin
for i:= 1 to N do
a[i]:= random(5) + 1;
writeln('Сформированный массив:');
for i:= 1 to N do
writeln(a[i]);
writeln('Номера элементов, совпадающих с первым элементом:');
for i:= 2 to N do
if a[i] = a[1] then writeln(i);
end.
Другие вопросы из категории
чем определяется допустимое удаление подключаемого устройства?
Читайте также
элементов совпадающих с первым элементом.
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы
чисел и выводит на экран этот же массив в прямом и обратном порядке. Протестировать алгоритм на произвольных массивах, состоящих из 1 числа, из 5 чисел, из 10 чисел.
2. Разработать схему алгоритма, который вводит массив из N целых чисел и выводит на экран элементы с чётными номерами. Протестировать алгоритм на произвольных массивах размерностью 5 и 8 элементов.
3. Разработать схему алгоритма, который вводит массив из N целых чисел и выводит на экран элементы с нечётными номерами в обратном порядке. Протестировать алгоритм для следующих исходных данных:
а) 1 3 5 6 8 9
б) -1 4 6 2 4 6 8 6 9
P.S. Убедительная просьба написать решение целиком и до наступления ночи. Я являюсь дилетантом в Паскале, а эти три задачи являются моим домашним заданием по информатике на завтра.
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.
2)Составьте программу,которая заполняет массив e[1..8] случайными целыми числами в диапазоне от 1 до 20 и находит сумму элементов с нечётными значениями и количество элементов кратных 3.
3)Составьте программу,которая заполняет массив e[1..14] случайными целыми числами в диапазоне от -10 до 10,затем изменяет знак положительных элементов на противоположный,а отрицательные элементы заменяет на 0.Спасибо.