Предмет: Информатика, автор: Ellen10

Вывести массив из 10 целых чисел с клавиатуры. Вывести количество элементов с чётными порядковыми номерами.

Ответы

Автор ответа: Puz1koO

1

const

n=10;

var

a:array [1..n] of integer;

i:integer;

begin

for i:=1 to n do

readln(a[i]);

writeln;

write('Count: ',n div 2);

end.

Предыдущий вопрос

Следующий вопрос

Интересные вопросы

Предмет: Русский язык, автор: cat008

составьте и запишите 4 сложных предложения с союзами оттого что, после того как, с тех пор как., за тем чтобы, по мере того как.

2 года назад

Предмет: Русский язык, автор: 2012QWEr

Найди в строках слова, которые отвечают на вопрос что? и заканчиваются буквой, обозначающий парный по глухости звонкости согласный звук.
Незабудка раскрывает
Синий глаз,
И росинка в нём сверкает,
Как алмаз.

2 года назад

Предмет: Русский язык, автор: elena7225

Корень слова кричать

2 года назад

Предмет: Химия, автор: 28916587

Оксид меди(2) при накаливании переходит в оксид меди(1). Напишите уравнение реакции и укажите какой элемент присоединяется и отдаёт электрон. По подробнее,если можно)

8 лет назад

Предмет: Биология, автор: JulianaPush04

Основной предпосылкой эволюции человека следует считать:

прямохождение,

трудовую деятельность,

использование руки,

речевое общение.

8 лет назад