сервис вопросов и ответовPASCAL:в заданном массиве подсчитать число нулевых элементов и вывести на экран их индексы
5-9 класс|
|
Denisranta802
19 янв. 2017 г., 11:19:17 (7 лет назад)
воылр
19 янв. 2017 г., 13:57:21 (7 лет назад)
const
n = 30;
var
a: array[1..n] of integer;
i, k, e: integer;
begin
Randomize;
writeln('Исходный массив');
for i := 1 to n do
begin
a[i] := Random(20) - 10;
write(a[i]:4)
end;
writeln;
k := 0;
write('Индексы нулевых элементов: ');
for i := 1 to n do
if a[i] = 0 then
begin
k := k + 1;
write(i:3)
end;
writeln;
writeln('Количество нулевых элементов: ', k)
end.
Тестовое решение:
Исходный массив
8 -8 0 9 -1 0 4 -6 -8 2 4 7 4 -5 4 2 -1 6 -1 5 5 6 -6 -6 -1 -4 0 -7 -8 -3
Индексы нулевых элементов: 3 6 27
Количество нулевых элементов: 3
Ответить
Другие вопросы из категории
Могут ли существовать:
а) два ящика с одинаковыми иминами на одном почтовом сервере,
б) два ящика с одинаковыми паролями на одном сервере ,
в) два ящика с одинаковыми именами на разных почтовых серверах,
г) два ящика с одинаковыми именами и паролями на разных почтовых сервера?
ВОПРОСЫ И ЗАДАНИЯ:
1)Где окажется исполнитель, выполнившый 16 раз подряд следующую группу команд?
Пройти 10 метров вперед
Повернуть на 90° по часовой стрелке.
Читайте также
Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N.
Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.
2. Определить, делится ли введенное число "а" на 3. Если делится то вывести на экран "Число делится на 3".Тип переменной определить самостоятельно. При
составлении условия учесть, что если число делится на 3, то то остаток от деления на 3 должен быть равен 0.
3. Дана программа на языке Паскаль.
var a,n,s: integer;
begin
s:=0;
n:=0;
repeat;
write('Введите число ');
readln(a);
s:=s+a;
n:=n+1;
until s>100;
writeln('Количество введенных чисел = ' ,n);
end.
Переписать программу используя цикл While.
4. Вывести на экран массив целых чисел, Состоящий из 15 элементов, значение которого из которых сгенерировано случайным образом из диапазона [20,60].
Вводятся 4 числа. Вывести на экран максимальное
Вводятся три числа. Вывести на экран число с минимальной суммой цифр.
Помогите пожалуйста в Паскале
Заполнить массив 20 случайными числами (использовать генератор случайных чисел). Найти в массиве максимальный элемент и вывести на экран его
значение и порядковый номер в массиве.
Вы находитесь на странице вопроса "PASCAL:в заданном массиве подсчитать число нулевых элементов и вывести на экран их индексы", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.