Задача.
Задан одномерный массив целых чисел. Найти количество нечетных чисел среди элементов массива
2. Таблица идентификаторов
№ | Наименование переменной | Обозначения в программе |
Имя массива | a | |
Размер массива | n | |
Индекс массива | i | |
Количество нечетных чисел | kol |
3. Листинг программы
program lab5;
uses
crt;
var
a: array [1…100] of integer;
n, i,kol: integer;
begin
clrscr;
writeln ('Введите размер массива n<=100');
readln (n);
writeln ('Введите элементы массива');
for i:=1 to n do
readln (a[ i ]);
kol:=0;
for i:=1 to n do
if odd(a[ i ]) then kol:=kol+1;
writeln(‘Количество нечетных = ’, kol);
readln;
end.
Вопросы для самоконтроля
- Что такое массив?
- Будут ли сохранены данные массива в памяти компьютера после окончания работы программы?
- Что такое индекс массива?
- Какого типа должны быть переменные, являющиеся индексами массива?
- Как можно задавать размер массива?
- Может ли реальное количество элементов в массиве быть меньше, чем указано при описании?
- Может ли реальное количество элементов в массиве быть больше, чем указано при описании?