Составить программу:
10-11 класс
|
сформировать в памяти массив из 15 целых чисел.Изменить массив так,чтобы числа под чётными номерами были удвоены,а на нечётных-заменены нулями.
Пожалуйста!
var
a: array [1..25] of integer;
begin
for i: integer := 1 to 25 do
begin
a[i] := random(255);
writeln(i, ' => ', a[i]);
end;
writeln('-----------------------------------');
for i: integer := 1 to 25 do
begin
if (i mod 2 = 0) then
a[i] := a[i] * 2
else
a[i] := 0;
writeln(i, ' => ', a[i]);
end;
end.
for i:=1 to mass.length do
if(odd(mass[i])) then mass[i]=0
else mass[i]*=2;
воу,это всё?огромнейшее спасибо!
Другие вопросы из категории
вывести на экран номер первого элемента, равного нулю, и нуль при отсутсвии такого элемента в массиве.
Ниже приведен рекомендованный вид экрана во время выполнения программы, для самопроверки результата(данные, введенные пользователем, выделены полужирным шрифтом).
Дан одномерный массив сотоящий из 10 элементов.Вывод на экрна номер первого элемента, равного нуляю, и нуль при отсутсвии такого элемента в массиве.
Ввод элеентов массива
Введите 1 элемент массива: 0
Введите 2 элемент массива: 1 и т.д. до 9
Очистка Экрана
0 1 2 3 4 5 6 7 8 9
НОмер нулевого элемента массива: 1
информационный объем сообщения, состоящего из 180 значков?
Читайте также
2. Составить программу для упорядоченное двух элементов по убыванию.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.
ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
Составить программу к.т. запрашивает буквы, пока не введут точку и находит количество букв "0".