Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal ABC Нарисовать флаг Белоруссии https://www.cyberforum.ru/ pascalabc/ thread1206111.html
Нарисовать флаг Белоруссии
Вычисление максимального элемента матрицы Pascal ABC
Создать модуль MATR который будет включать в себя следующие функции и процедуры: вычисление максимального элемента матрицы; вычисления суммы элементов матрицы.
Pascal ABC Решить неравенство https://www.cyberforum.ru/ pascalabc/ thread1205943.html
Решить неравенство 1 или 2 1) \log_2(x-1)>2 2)\log_{0,8}(x-2)>1 Помогите пожалуйста!!! Добавлено через 12 минут
Pascal ABC Дописать к каждой строке файла результаты решения соответствующего уравнения и сохранить их в новом файле https://www.cyberforum.ru/ pascalabc/ thread1205871.html
Дано файл, в котором каждая строка содержит три числа, разделенные пробелом - коэффициенты квадратного уравнения. Дописать к каждой строке файла результаты решения соответствующего уравнения и сохранить их в новом файле.
Нужно Составить блок-схему к программе Pascal ABC
uses crt; const k = 4;n = 4; var L: arrayof integer; i, j, p: integer; begin
Pascal ABC Странный текст.Перевод на русскую Открываю код,а там вместо русских слов вот это ўҐ¤iвм **§ўг б®авг Є*ўЁ Что делать?Как понять,что там написано? https://www.cyberforum.ru/ pascalabc/ thread1205726.html
Pascal ABC Через каждые 2 точки проводить прямые и считать количество точек по одну и по другую сторону прямой https://www.cyberforum.ru/ pascalabc/ thread1205663.html
Дано 12 точек, принадлежавшие данной плоскости. Через каждые 2 точки проводить прямые и считать количество точек по одну и по другую сторону прямой. Показать графически.
Pascal ABC Найти сумму матриц
Даны две целые квадратные матрицы C и T порядка n. Если количество нечетных элементов на обеих диагоналях матрицы T больше количества таких же элементов в матрице T больше количества таких же элементов в матрице C, то найти D=E+T+C, при иных - D=2E+T+3C, где E - единичная матрица порядка n. Need help, братцы)
Pascal ABC Записать в типизированный файл двумерный массив https://www.cyberforum.ru/ pascalabc/ thread1205587.html
Добрый день. Каким способом можно записать в типизированный файл двумерный массив?
Pascal ABC Вычисление определенного интеграла методом Симпсона https://www.cyberforum.ru/ pascalabc/ thread1205463.html
Добрый день. Задача: Написать процедуру вычисления определенного интеграла методом Симпсона. У меня такой вопрос, если пределы интегрирования ввести с клавиатуры не составляет труда, то как быть с функцией? Заранее спасибо.
Из текстового файла вывести на дисплей слова длиной более 8 букв Pascal ABC
Из текстового файла вывести на дисплей слова длиной более 8 букв Дано текстовый файл F вывести на екран слова какие имеют больше чем 8 букв
Pascal ABC Сформировать базу данных в виде массива записей, организовать запрос к базе данных Прошу помочь с решением: Разработать программу для обработки данных типизированного файла. Обработка данных должна включать процедуры без параметров: для вывода шапки таблицы; для вывода данных одной записи; для создания файла; для дополнения файла новыми записями; для записи данных в файл; для чтения данных файла; для модификации ряда записей файла; https://www.cyberforum.ru/ pascalabc/ thread1205356.html
906 / 754 / 833
Регистрация: 06.09.2013
Сообщений: 1,561
12.06.2014, 12:15 0

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

12.06.2014, 12:15. Показов 7278. Ответов 1
Метки (Все метки)

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

Решение

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
uses crt;
const
  m = 2;
  n = 3;
var
  A: array[1..m, 1..n] of integer;
  S: integer;
  i, j: byte;
  
begin
  writeln('ведите ', m * n, ' элементов:');
  for i := 1 to m do
    for j := 1 to n do 
      readln(a[i, j]);
  ClrScr;
  writeln('Матрица ', m, 'x', n, ':');
  for i := 1 to m do begin
    S := 0;
    for j := 1 to n do begin
      write(a[i, j]:5);
      S := S + a[i, j]
    end;
    writeln('Сумма = ':10, S)
  end
end.


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

Упорядочивание по возрастанию элементов каждой строки двумерного массива
Составьте программу упорядочивания по возрастанию элементов каждой строки двумерного массива (с...

Найти сумму элементов в каждой строке двумерного массива, состоящего из целых чисел
Найти сумму элементов в каждой строке двумерного массива, состоящего из целых чисел. Размер m x n....

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

Вычислить сумму элементов каждой строки
7. Дан произвольный массив целых чисел размерности N*M. Вычислить сумму элементов каждой строки.

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

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

Вывести сумму чётных элементов каждой строки двумерного массива
В массиве C(3*4) целых чисел из диапазона вывести сумму четных элементов каждой строки

Найти сумму элементов в каждой строке двумерного массива
Здравствуйте) Помогите пожалуйста решить несколько задач) Заранее огромнейшее спасибо) 1. В...

Найти сумму элементов в каждой строке двумерного массива, состоящего из целых чисел
Найти сумму элементов в каждой строке двумерного массива состоящего из целых чисел размер m на n.

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