Дан массив целых чисел А(10). Все нечетные элементы удвоить.
10-11 класс
|
const n = 10;
var
a: array[1..n] of integer;
i: byte;
begin
for i := 1 to n do begin
a[i] := random(20);
write(a[i], ' ');
end;
writeln;
for i := 1 to n do begin
if(a[i] mod 2 <> 0) then a[i] := a[i] * 2;
write(a[i], ' ');
end;
end.
Другие вопросы из категории
Результат присвоить символьной переменной. Две точки находятся на одной окружности, если длины радиус-векторов, соединяющих эти точки с началом координат, равны (проверку на равенство осуществить с точностью до е=1.0Е-3)
6 7 18 19 30 31
5 8 17 20 29 32
4 9 16 21 28 33
3 10 15 22 27 34
2 11 14 23 26 35
1 12 13 24 25 36
8-битную кодировку КОИ-8.При этом информационное сообщение уменьшилось на 1280 бит.Какого длина сообщения в символах ? Ответьте пожалуйста,, объясните по подробнее
a)Обрабатывает команды, вводимые пользователем
b)Хранит все команды, которые использует пользователь в своей работе
c)Обрабатывает команды и программы, выполняемые при каждом запуске компьютера
d)Хранит все команды операционной системы
Читайте также
только элементы кратные 2
3)Найти сумму первых пяти элементов
Составить программу Дан массив целых чисел , размерность -12
1) Заполнение массива производить случайными числами из диапозона [-10;35]
2)Вывести на печать только положительные элементы
3)Найти количество отрицательных элементов
Составить программу
Известны данные о выпуске прождукции ( ткани в метрах ) ткацким цехом текстильного комбината за каждый день месяца . Определить количество ткани ( метров) произведенных цехом за месяц .
среди 10 элементов вещественного массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
массива
3)заполнить массив из n целых чисел.выяснить какое число встречается раньше-положительное или отрицательное.
4)в целочисленном массиве есть отрицательные элементы.вывести номера этих элементов
цифр(включая однозначные числа). 2. вставить число k перед всеми элементами, в которых есть цифра 1(k вводить с клавиатуры). 3. переставить первые три и последние три элемента местами, сохраняя их следование.