сервис вопросов и ответов№1 Дана действительная квадратная матрица порядка n. Найти произведение четных элементов.
10-11 класс|
|
№2 В данном одномерном массиве Х[1..n] найти сумму отрицательных элементов , кратных 7.
Stepanyanhayar
05 нояб. 2013 г., 9:37:26 (10 лет назад)
Tarantinova98m
05 нояб. 2013 г., 12:18:15 (10 лет назад)
const n=10;
var a:array[1..n,1..n];
p,i,j: integer;
p:=1;
begin
for i:=1 to n do
for j:=1 to n do
begin
readln(a[i,j]);
if (a[i,j] mod 2=0) and (a[i,j<>0) then p:=p*a[i,j]
end;
writeln(p);
end.
Ответить
Другие вопросы из категории
Определите значение целочисленных переменных a и b после выполнения фрагмента программы:
a := 42;
b := 14;
a := a div b;
b := a*b;
a := b div a;
Читайте также
1.Дан целочисленный массив X(N). Найти сумму четных элементов массива .Если эта сумма больше заданного числа Z , то у элементов , расположенных на
нечетных местах , сменить знак на противоположный ,иначе выдать соответствующее сообщение.
2.Дан массив X(N,M) . Среди четных столбцов массива найти сумму положительных элементов
3.Найти произведение элементов каждого столбца массива принадлежащих промежутку [2,6] . Из полученных значений сформировать одномерный массив.
Дан массив X(N).Найти среднее арифметическое элементов массива,значения которых заключены в интервале [-3;3]. Если эта величина больше
заданного числа Z,то найти сумму четных элементов,иначе- произведение нечетных элементов.
Друзья,очень нужна ваша помощь,пожалуйста,если Вы решили мне помочь-отпишитесь. Заранее спасибо!
Вы находитесь на странице вопроса "№1 Дана действительная квадратная матрица порядка n. Найти произведение четных элементов.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.