Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal Найти две самые удалённые точки https://www.cyberforum.ru/ pascal/ thread1862335.html
Один очень сильный мальчик по имени Тима поймал Вас на переулке Манхэттена. Единственный шанс уйти без повреждений — решить следующую задачу! Даны N точек в пространстве. Требуется найти две самые...
Pascal Обработка строки
Необходимо создать программу, необходимые функции и процедуры у меня есть (прикреплены ниже), а с основным телом есть проблемы. Помогите, пожалуйста, студенту. Условие : Дана строка, содержащая...
Pascal Перевод в двоичный код перевод числа в двоичный код и обратно https://www.cyberforum.ru/ pascal/ thread1861780.html Pascal Задача. Терминалы на вокзале На вокзале установлено N типов терминалов по продаже билетов. Количество терминалов i-го типа равно Ci. Когда пассажир приходит на вокзал чтобы купить билет, то он выбирает свободный терминал с... https://www.cyberforum.ru/ pascal/ thread1861720.html
Pascal Ошибка: файл не найден
В 13 строчке выдает ошибку "файл не найден". Подскажите в чем может быть ошибка Program otchot; const N=5; M=15; K=4; type stud=record fam:array of char; GOD: INTEGER; O:ARRAY OF 2..5...
Pascal Вывести порядок, в котором находятся машины после обработки всех сообщений В гонках "Формулы N" участвует N машин. В результате квалификационного заезда машины получили порядковые номера и стартовали в порядке от 1 до N. Вася - страстный поклонник гонок, но у него в... https://www.cyberforum.ru/ pascal/ thread1861662.html
Pascal Специальная функция: функция Бесселя https://www.cyberforum.ru/ pascal/ thread1861559.html
Составить программу с использованием процедур и функций для получения таблицы функции на отрезке с шагом h. Кроме того, сохранить полученную таблицу в файле выходных данных....
Pascal Определить количество перемен знака в массиве
Программа с двумерным массивом. Дан массив A (I,J). Определить количество перемен знака (с " + " на " - ", или " - " на " + ")" Ещё было бы круто, если была бы схема к этой задаче. Заранее...
Pascal Упражнения Pascal помогите пожалуйста https://www.cyberforum.ru/ pascal/ thread1861504.html Pascal как работает программа Здравствуйте,помогите узнать как работает программа,а именно вывод слов которые встречаются по одному разу. Если не трудно,сделайте комментарии к программе,заранее спасибо!type mas=array of string;... https://www.cyberforum.ru/ pascal/ thread1861460.html
Pascal подсчитать сумму выражения. Написать программу, находящую ответ за минимальное время и наименьший объем памяти
Необходимо подсчитать сумму S(n) = 1 - 2 + 3 - 4 + … + (-1)n+1*n. Напишите программу, которая находит ответ за минимальное время и использует наименьший объем оперативной памяти. Входные данные:...
Pascal Ошибка: "Индекс находился вне границ массива" Ребят, помогите пожалуйста, никак не пойму в чем ошибка. Pascal пишет: До обменаОшибка времени выполнения: Индекс находился вне границ массива. Само задание: Дан массив из n слов произвольной... https://www.cyberforum.ru/ pascal/ thread1861366.html
Почетный модератор
64287 / 47586 / 32739
Регистрация: 18.05.2008
Сообщений: 115,182
28.11.2016, 14:07 0

Вывести сумму чётных элементов каждой строки двумерного массива - Pascal - Ответ 9825521

28.11.2016, 14:07. Показов 3459. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено Розаля как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
const m=3;
      n=4;
var c:array[1..m,1..n]of integer;
    i,j:byte;
    s:integer;
begin
randomize;
writeln('Матрица С');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    c[i,j]:=-10+random(21);
    write(c[i,j]:4);
   end;
  writeln;
 end;
writeln('Суммы четных элементов строк');
for i:=1 to m do
 begin
  s:=0;
  for j:=1 to n do
  if c[i,j] mod 2=0 then s:=s+c[i,j];
  writeln('строка ',i,'=',s);
 end;
end.


Вернуться к обсуждению:
Вывести сумму чётных элементов каждой строки двумерного массива Pascal
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
28.11.2016, 14:07
Готовые ответы и решения:

Определить сумму элементов каждой строки двумерного массива
В прямоугольной матрице размером М*Т, имеющей имя МАS содержаться целые числа. М - число строк, Т -...

Вычислить сумму положительных элементов каждой строки двумерного массива
Составить программу на Паскале для обработки двумерного массива размерностью 3*4. Массив заполнить...

Вычислить сумму положительных элементов каждой строки двумерного массива
Пожалуйста, напишите оригинально Составить программу на Паскале для обработки двумерного массива...

Найти нули в каждой строке двумерного массива и заменить их на сумму элементов всей строки
const n=5; var a:array of real; i,j,k:integer; sum:real; begin a:=0.1; a:=0; a:=4; a:=4;...

1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
28.11.2016, 14:07
Помогаю со студенческими работами здесь

Для каждой строки двумерного массива D вычислить сумму элементов столбцов с четными номерами
Для каждой строки двумерного массива D вычислить сумму элементов колонок с четными номерами

Найти сумму элементов каждой строки двумерного массива
Дан двумерный массив A(4,3). Найти сумму элементов каждой строки этого массива.

Вычислить сумму элементов каждой строки двумерного массива
Задать двумерный массив m * n целых чисел m = 2, n = 3. Вычислить сумму элементов каждой строки

Найти сумму четных элементов каждой строки массива
1.Заполнить двумерный числовой массив А целыми числами. Найти сумму четных элементов каждой строки...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2023, CyberForum.ru