Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC Найти множество таких чисел из первой последовательности, которых нет во втором https://www.cyberforum.ru/ pascalabc/ thread1027009.html 1)даны две непустые последовательности целых чисел, содержащие числа в интервале от 1 до 50. Каждая из последовательностей оканчивается нулем. Найти множество таких чисел из первой последовательности , которых нет во втором.	Pascal ABC Процедура ввода и вывода комплексного массива(с примером) Есть у меня пример с двумерными матрицами. Надо организовать такой же ввод как в примере и вывод для комплексной матрицы. uses crt; const m=3;n=3;k=3;l=3; var i,j:integer; a:array of real; b:array of real; c:array of real; begin clrscr; For i:=1 to m do
Pascal ABC В текстовом файле хранится список служащих. Для каждого служащего указаны фамилия и инициалы, название занимаемой должности, год поступления на ра¬бот В текстовом файле хранится список служащих. Для каждого служащего указаны фамилия и инициалы, название занимаемой должности, год поступления на ра¬боту и оклад. Написать программу, выполняющую следующие действия: □ корректировку или дополнение списка с клавиатуры; □ сортировку по фамилии, окладу или году поступления; □ вывод на экран информации о служащем, фамилия которого... https://www.cyberforum.ru/ pascalabc/ thread1026990.html	Pascal ABC Есть две задачи https://www.cyberforum.ru/ pascalabc/ thread1026963.html Решите если можете,буду очень благодарен. 1.Надо перевести дробовое число в двуичной системе(011010.0102-просто пример) исчисления в десятичную(174.2510). 2.Перевести число с десятичной системы исчисления в ДДК (двуично-десятичную). Заранее спасибо!!
Pascal ABC Дан двумерный массив A(n ×m) . Найти сумму отрицательных элементов в 1-ом столбце матрицы Дан двумерный массив A(n ×m) . Найти сумму отрицательных элементов в 1-ом столбце матрицы. Добавлено через 2 часа 25 минут Правильно ? const n = 5; m = 5; var a:arrayof integer; j,i,sum:integer;	Pascal ABC Подсчитать количество различных букв в заданном слове Подсчитать количество различных букв в заданном слове. Слова вводить вручную. Спасибо. https://www.cyberforum.ru/ pascalabc/ thread1026914.html
Pascal ABC Все отрицательные компоненты вещественного вектора b (10) заменить их квадратами Помогите написать программу. Все отрицательные компоненты вещественного вектора b(10) заменить их квадратами, а все положительные увеличить на 5. https://www.cyberforum.ru/ pascalabc/ thread1026876.html	Файлы с комбинираванным типом данных Pascal ABC Известны данные о 20 сотрудниках фирмы (фамилия, зарплата и пол). Определить фамилию мужчины, имеющего самую большую зарплату (считать, что такой есть и он единственный). const kil=20; Type firma=record name:string; z:longint; pol:char; end; Var firmaarr:arrayof firma; i,imx,imnz,imnm:integer; begin
Pascal ABC Содержимое массива 3 на 3 повернуть на 90 градусов по часовой стрелке https://www.cyberforum.ru/ pascalabc/ thread1026717.html Содержимое массива 3 на 3 повернуть на 90 градусов по часовой стрелке.	Pascal ABC Используя модуль crt Помогите с решением пожалуйста: 7. Используя модуль CRT, написать программу «функции», выводящую на экран сообщение о своих возможностях: F1- квадратный корень F2- квадрат F3- синус F4- косинус F5- тангенс F10- выход Вывод оформить в виде окна window(20, 5, 60, 20) цвета 1 с цветом шрифта 3 https://www.cyberforum.ru/ pascalabc/ thread1026652.html
Pascal ABC Получить массив и найти сумму всех элементов матрицы Дословное задание:Получить массив С1,С2, ... Cn по правилу: Сi=0, если все элементы i-го столбца матрицы равны 0, иначе Сi=1. Найти сумму всех элементов матрицы. (Только это условие, дополнительного ничего нет)помогите,плиз!)	Pascal ABC Создать третий массив, каждый элемент которого равен сумме соответствующих элементов двух первых https://www.cyberforum.ru/ pascalabc/ thread1026645.html Даны два двумерных массива одинакового размера. Создать третий массив, каждый элемент которого равен сумме соответствующих элементов двух первых массивов.

ildwine

Супер-модератор

6192 / 2938 / 1300

Регистрация: 04.03.2013

Сообщений: 5,780

Записей в блоге: 1

03.12.2013, 17:54

Найти наибольший элемент каждой строки матрицы и записать их в массив B - Pascal ABC - Ответ 5429026

03.12.2013, 17:54. Показов 1539. Ответов 2

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

Pascal

const
  n = 6;
  m = 7;
var
  a : array[1..n, 1..m] of integer;
  b : array[1..n] of integer;
  i, j : integer;
  max : integer;
begin
  randomize;  
  for i := 1 to n do
  begin
    max := -32768;
    for j := 1 to m do
    begin
      a[i,j] := random(100) - 50;
      write(a[i,j]:5);
      if a[i,j] >= max then max := a[i,j]      
    end;
    b[i] := max;
    writeln
  end;
  writeln('массив максимальных значений строк:');
  for i := 1 to n do
    write(b[i]:5)   
end.

Вернуться к обсуждению:
Найти наибольший элемент каждой строки матрицы и записать их в массив B Pascal ABC

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

03.12.2013, 17:54

Готовые ответы и решения:

Найти в каждой строке матрицы наибольший элемент и записать его в одномерный массив
Здравствуйте! Если не трудно, не могли бы вы мне немного помочь. Условие задачи такое: //Написать...

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

Товарисчи объясните пожалуйста как сделать данную задачу! (Найти наибольший элемент каждой строки А(4,6) и записать их в массив Y)
Найти наибольший элемент каждой строки А(4,6) и записать их в массив Y. С программированием не...

Для каждой строки матрицы найти максимальный элемент и записать их в одномерный массив
Все привет, ребят, помогите с программой пожалуйста.. Вот задание: Для каждой строки матрицы...

	03.12.2013, 17:54

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

03.12.2013, 17:54

Помогаю со студенческими работами здесь

Для каждой строки матрицы найти максимальный элемент и записать их в одномерный массив
помогите пожалуйста. Pascal. задание: для каждой строки матрицы найти максимальный элемент и...

Для каждой строки матрицы найти максимальный элемент и записать их в одномерный массив
Помогите, очень нужна помощь. Завтра последний день, когда можно сдать:( Задание: Для каждой...

Для каждой строки матрицы найти последний четный элемент и записать данные в новый массив
Дан массив размером n*n , элементы которого целые числа . Для каждой строки найти последний четный...

Найти наибольший элемент каждой матрицы и записать 1 в ту строку и столбец, в которых он находится
Даны матрицы А(6,3) и В(4,5).Найти наибольший элемент каждой матрицы и записать 1 в ту строку и...

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

Наверх