сервис вопросов и ответовПодсчитать количество элементов одномерного массива, которые совпадают со своим номером
5-9 класс|
|
Theonlyelya
25 сент. 2015 г., 4:01:49 (8 лет назад)
Nastyragozina
25 сент. 2015 г., 6:39:58 (8 лет назад)
Такая ситуация выпадает не очень часто, поэтому запускай программу несколько раз подряд. Можно повысить вероятность, но это усожнит программу.
var
i, n: integer;
k: array[1..10]of integer;
begin
for i := 1 to 10 do
begin
k[i] := random(10)+1;
write(k[i],' ');
if k[i]=i then n:=n+1;
end;
writeln;
writeln('Число искомых элементов: ',n)
end.
Ответить
Другие вопросы из категории
Запишите полный текст программы.
for i:=1 to n-1 do
begin imax:=i;
for j:=i+1 to n do if a[j]>a[imax] then imax:=j;
x:=a[i];
a[i]:=a[imax];
a [imax]:=x
Рассчитайте объем видеопамяти необходимой для хранения графического изображения, занимающего весь экран монитора с разрешением 1024х768 и количеством
отображаемых цветов, равным 16 777 216
Читайте также
Вычислить среднее арифметическое значение тех элементов одновременного массива, которые попадают в интервал от -2 до 10. Размерность массива произвольная.
ИЛИ Дан массив, содержащий 12 элементов и заполненный по формуле A=(i-4)/(3*i). Найти количество элементов в этом массиве больших 0, но меньших 0,2. (решение писать как в турбо паскале)
1)В диапазоне от 0 до 100 подсчитать количество чисел оканчивающихся на 3.
2)В диапазоне от 0 до 50 подсчитать количество чисел сумма цифр которых равна 3.
составьте программу которая запрашивает значения элементов одномерного числового массива а, стоящего из 10 элементов,формирует и выводит на экран в
строку данный массив. Найти сумму неположительных элементов массива,количество элементов кратных 3, произведение элементов,стоящих на четных местах
Вы находитесь на странице вопроса "Подсчитать количество элементов одномерного массива, которые совпадают со своим номером", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.