сервис вопросов и ответовСоставьте программу вычисления в массиве A(N) произведения четных элементов.
10-11 класс|
|
привет345543
15 авг. 2013 г., 13:23:58 (10 лет назад)
АнитаЗайцева
15 авг. 2013 г., 14:07:57 (10 лет назад)
program csdnciuo;
uses crt;
'var a:array [1..100] of integer;
i,p,n:integer;
begin
clrscr;
readln(n);
for i:=1 to n do
readln(a[i]);
p:=1;
for i:=1 to n do
if a[i] mod 2 =0 then p:=p*a[i];
writeln(p);
readln;
end.
Morozowtimofei
15 авг. 2013 г., 15:21:12 (10 лет назад)
var
a: array [1..100] of integer;
i, p, n: integer;
begin
p := 1;
read(n);
for i := 1 to n do
begin
read(a[i]);
if a[i] mod 2 = 0 then
p := p * a[i];
end;
writeln(p);
end.
Ответить
Другие вопросы из категории
1. Что понимают под информацией?
2. Как вы понимаете, что такое "теория информации"?
3. С каким понятием тесно связано понятие алгоритма?
4. В чем заключается проблема создания искусственного интеллекта?
5. Попробуйте составить алгоритм узнавания кошки.
Определить является ли целая часть числа m/n
четной. Если она четная,
то m возвести в квадрат, иначе n утроить.
6. Написать программу для нахождения числа нечетных элементов в массиве из 10 беззнаковых чисел.
7. Написать программу для нахождения числа отрицательных элементов в массиве из 10 знаковых чисел
8. Написать программу для замены всех четных элементов массива из 10 беззнаковых чисел единицами.
9. Написать программу для замены всех нулевых элементов массива из 10 знаковых чисел единицами
10. Написать программу для замены всех троек в массиве из 10 беззнаковых чисел пятерками.
Читайте также
1. Составьте программу ввода и вывода массива: 5, -2, 3, -6, 7, 9, -4, 8, 1, 2, 7, -3.
2. Составьте блок-схему алгоритма и программу вычисления в массиве A(10) количества положительных элементов.
3*. Составьте программу заполнения массива, не используя клавиатуру, числами: 1, 3, 5, 7, 9, 11, 13, 15, 17, 19.
Помогите решить, очень нужно... 2. Составьте блок-схему алгоритма(её не надо) и программу вычисления в массиве A(10) количества положительных
элементов.
3. Составьте программу заполнения массива, не используя клавиатуру, числами: 1, 3, 5, 7, 9, 11, 13, 15, 17, 19.
Паскаль, составьте программу для двумерного массива:
Найти произведение отрицательных элементов указанной строки двумерного массива размером 4*5 целых чисел.
Помогите пожалуйста!! ) составить программу в "Pascal abc"!!)
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
1)составьте программу вычисления суммы чисел в диапазоне от 45 до 115 45+....+115
2)Составьте программу которая выводит на экран числа кратные 2 и 13 в диапазоне от 2 до 150
3)Дано вещественное число А и целое число N(>0).Испульзуя один цикл вывести все целые степени числа А от 1 до N
------------------------ОПЕРАТОР WHILE
Вы находитесь на странице вопроса "Составьте программу вычисления в массиве A(N) произведения четных элементов.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.