Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Pascal сделайте эту программу кто нить не могу уже Введите с клавиатуры одномерный массив S(B), элементами которого являються положительные и отрицательные целые числа.Сформулируйте массив X(D), состоящий из четных элементов массива S(B) и массива Y(N) - из нечетных. В двух новых массивах подсчитайте среднее арифмитическое элементов и сравните между собой. Добавлено через 1 минуту Turbo pascal https://www.cyberforum.ru/ pascal/ thread317064.html Pascal курсовой проект
Напишите на языке Pascal программу multnum, умножающую два целых числа произвольной длинны, представленных однонаправленными связаными списками. что сдесь не так?что неправильно? program multnum; type pe=^element1; element1=record x:integer; nexte; end;
Pascal найти количества строк и столбцов динамического массива все элементы которых различны на паскале найти количества строк и столбцов динамического массива все элементы которых различны на паскале https://www.cyberforum.ru/ pascal/ thread316938.html Pascal Задание по теме - Подпрограммы Написать программу, которая формирует новый массив, элементами которого являются среднеарифметические значения каждой пары исходного массива. https://www.cyberforum.ru/ pascal/ thread316918.html
Текстовый файл Pascal
Текстовый файл Дан файл, содержащий текст на русском языке. Составить в алфавитном порядке список всех слов, встречающихся в этом тексте.
Pascal Типизированные файлы https://www.cyberforum.ru/ pascal/ thread316881.html
1.сведения о книгах хранятся в файле :фамилия автора,название,стоимость и год издания.вывести сведения о книгах дороже "х" и выпущенных в 19 веке."х" вводится с клавиатуры.Удалить из файла информацию о книгах запрещенных авторов.фамилия автора вводится с клавиатуры. 2.компоненты типизированного файла - вещественные числа.поменять местами первую компаненту с минимум,а последнюю с максимумом ...
Pascal ошибка в вызове процедуры меняющей значения х и у для транспонирования матрицы Описать процедуру swap(x,y) меняющую значения х и у, с ее помощью транспонировать матрицу...ПРОБЛЕМА с описанием вызова процедуры...счетчики меняются в процедуре но тут же при выводе на экран возвращаются..прошу совета.. uses crt; const nmax=20; procedure trans(i,j: integer); var n:integer; begin n:=i; i:=j; j:=n; https://www.cyberforum.ru/ pascal/ thread316870.html Записи.Множества. Pascal
Помогите пожалуйста с задачей. Из множества целых чисел вводимых с клавиатуры в линейную таблицу из 10-ти элементов, выделить множество чисел кратных минимальному числу этой таблицы.
Pascal Сформировать запись. Помогите пожалуйста с задачей. Сформировать запись, имеющую следующую структуру type владелец=record фамилия:string; адрес:string; марка автомобиля:string; рег. номер:string; год выпуска:1900..2000; end; и определить: 1)количество автомобилей каждой марки; 2)владельца самого старого автомобиля; 3)фамилии владельцев и номера автомобилей данной марки. https://www.cyberforum.ru/ pascal/ thread316860.html Pascal На процедуру или функцию На процедуру или функцию Написать программу вычисления суммы p/q=1-1/12+1/3-...+(-1)степень n+1 /n. https://www.cyberforum.ru/ pascal/ thread316854.html
Как Указать брата для вершины бинарного дерева Pascal
program Project2010101010101010101010; {$APPTYPE CONSOLE} uses SysUtils; type link = ^element; element = record
Pascal Найдите среднюю температуру для дней, когда температура поднималась выше нуля градусов. https://www.cyberforum.ru/ pascal/ thread316787.html
помогите написать программу для решения задачи. Ученики вели дневники наблюдения за погодой и ежедневно записывали дневную температуру. Найдите среднюю температуру для дней, когда температура поднималась выше нуля градусов. Определите количество таких дней. Гарантируется, что за время наблюдения хотя бы в один из дней температура поднималась выше нуля. Программа получает на вход количество дней,...
Эксперт Pascal/Delphi
6811 / 4568 / 4819
Регистрация: 05.06.2014
Сообщений: 22,438
04.04.2019, 08:59 0

Сформируйте одномерный массив, каждый элемент которого равен сумме элементов соответствующей строки исходной матрицы. - Pascal - Ответ 13462406

04.04.2019, 08:59. Показов 1532. Ответов 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
27
28
29
30
31
const
  m = 4;
  n = 6;
 
var
  a: array [1..m, 1..n] of real;
  b: array [1..n] of real;
  
  
  i, j: integer;
  sum: real;
 
begin
  Randomize;  
  Writeln('Исходный массив: ');
  for i := 1 to m do
  begin
    sum := 0;
    for j := 1 to n do
    begin
      a[i, j] := -100 + random(201);
      Write(a[i, j]:8:2);
      sum := sum + a[i, j];
    end;
    b[i] := sum;
    writeln;
  end;
  Writeln('Одномерный массив: ');  
  for i := 1 to m do
    write(b[i]:8:2);
end.


Вернуться к обсуждению:
Сформируйте одномерный массив, каждый элемент которого равен сумме элементов соответствующей строки исходной матрицы. Pascal
0
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
04.04.2019, 08:59
Готовые ответы и решения:

Сформировать одномерный массив, каждый элемент которого равен сумме отрицательных нечетных элементов
2. Дан двумерный массив размером 5 x 6. Сформировать одномерный массив, каждый элемент которого...

Сформировать одномерный массив, каждый элемент которого равен сумме положительных элементов в соответствующем столбце двухмерного массива
Дан двухмерный массив целых чисел. Сформировать одномерный массив, каждый элемент которого равен...

Сгенерировать одномерный массив, каждый элемент которого равен сумме соответствующей строки матрицы А
Составить программу генерирующую одномерный массив каждый элемент которого равен сумме...

Создать массив, каждый элемент которого равен количеству элементов соответствующей строки матрицы, больших X
Дан двумерный массив размером 5х6, заполненный целыми числами из [-34;45). сформируйте одномерный...

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

Двумерный массив. Сформировать одномерный массив каждый элемент которого равен первому нечетному элементу соответствующей строки
Здравствуйте. Выручайте ;) Сформировать одномерный массив каждый элемент которого равен первому...

Сформировать массив, каждый элемент которого равен количеству элементов соответствующей строки
Дан двумерный массив размер 4*6,заполненный целыми числами с клавиатуры. Сформировать одномерный...

Составить программу, формирующую одномерный массив, каждый элемент которого равен сумме соответствующей строки
Здравствуйте! Нужна помощь программистов в решении задачи. Нужно составить программу, генерирующую...

Массив: Сформировать массив, каждый элемент которого равен сумме положительных элементов соответствующей строки.
Дан двумерный массив целых чисел, состоящий из n строк и m столбцов, заполненный случайным образом...

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