Вопрос по информатике:
Помогите, пожалуйста, срочно!!
Дан одномерный массив A(N), N<=50.
Подсчитать количество элементов, удовлетворяющих условию ! A(N)! <=3, распечатать все такие элементы и их номера.
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 20.05.2017 19:25
- Информатика
- remove_red_eye 9633
- thumb_up 39
Ответы и объяснения 1
Const n = 5;
var
a: array[1..n] of integer;
i, k: integer;
begin
//считываем массив
for i:=1 to n do
readln(a[i]);
k:=0;
//проверяем каждый элемент
//если он <= 3, то выводим
//на экран элемент и индекс,
//и увеличиваем k на 1
for i:=1 to n do
if a[i] <= 3 then
begin
writeln('Элемент массива: ', a[i], ' Индекс: ', i);
inc(k);
end;
writeln('Количество элеметнов: ', k);
end.
- 21.05.2017 15:00
- thumb_up 10
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.