Задайте массив из нечетно-отрицательных 10 чисел
5-9 класс
|
var
arr : array [1..10] of integer;
i, number : integer;
begin
i := 1;
number := -1;
for i := 1 to 10 do
begin
arr[i] := number;
number := number - 2;
end;
for i := 1 to 10 do //Вывод массива, если не нужно, убрать
writeln(arr[i]);
end.
Другие вопросы из категории
значение и порядковый номер в массиве.
Выразите объём информации в различных единицах,заполняя таблицу:
Бит Байт Кбайт
появился встречный ветер со скоростью 1 м/с, и его скорость возрастала
каждую секунду вдвое в течение еще 6 секунд. На сколько метров назад
переместился биплан за эти 7 секунд действия ветра?
задачу; б) Оля слушает по радио новости; в) Дима учит правило; г) Саша и Вова разговаривают по телефону; д) Женя отправляет SMS-сообщение; е) Лена рисует план квартиры.
просмотру телепередач, сколько – общению с друзьями и т.д.
Читайте также
а) среднее арифметическое нечетных чисел
б) сумму чисел, не превышающих 10
в сумму чисел, кратных 3
На экран выводятся исходные значения и результаты вычислений
Плиз помогите, завтра здать нужно((
от -100 до 100. Определить минимальное положительное число.
2) Дан массив, состоящий из 10 чисел. Найдите номера тех элементовв масива, которые наименее различаются.
2. Массив из 6 отрицательных и положительных целых чисел вводится в области описания констант. Найти сумму положительных элементов массива.
3. Массив из 5 целых чисел вводится с клавиатуры в строку. Найти сумму элементов массива, стоящих на чётных позициях. Вывести исходный массив и полученную сумму.
4. Массив из 40 целых чисел из промежутка [10,90] задается с помощью генератора случайных чисел. Найти сумму элементов массива, кратных n . Вывести исходный массив и полученную сумму.
Помогите кто в чем может.
элементов массива.
3)задан массив из 9 целых чисел.Вывести на экран чётные элементы
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.