Составить алгоритм для квадратной матрицы.Pascal (Паскаль)

@Lena-n1 · Регистрация: 08.11.2010

Author24 — интернет-сервис помощи студентам

Помогите пожалуйста решить, очень надо!!!
В заданной квадратной матрице размером 10 x 10 построить вектор длиной 19, элементы которого -- максимумы элементов, диагоналей, параллельных главной диагонали.

@Puporev · 08.11.2010, 12:17

Pascal

uses crt;
const n=10;
var a:array[1..n,1..n]of integer;
    b:array[1..2*n-1] of integer;
    i,j,max,l:integer;
begin
clrscr;
randomize;
Writeln('Матрица:');
for i:=1 to n do
 begin
  for j:=1 to n  do
   begin
    a[i,j]:=random(50);
    write(a[i,j]:4);
   end;
  writeln;
 end;
for l:=1 to 2*n-1 do{количество диагоналей}
 begin
  if l<=n then {идем с низу до главной включитнльно}
   begin
    max:=a[n-l+1,1];
    for i:=n-l+1 to n do
    if a[i,i-n+l]>max then max:=a[i,i-n+l];
    b[l]:=max;
   end
  else if l>n then {идем вправо до конца}
   begin
    max:=a[1,l-n+1];
    for i:=1 to 2*n-l do
    if a[i,i+l-n]>max then max:=a[i,i+l-n];
    b[l]:=max;
   end
  end;
writeln('Максимальные элеметы диагоналей, параллельных главной:');;
for i:=1 to 2*n-1 do
write(b[i]:4);
readln
end.

@Lena-n1 · 08.11.2010, 13:33 **[ТС]**

спасибо за алгоритм, но надо еще и блок- схему, не могли бы вы помочь?

Новые блоги и статьи Все статьи Все блоги /
Создаем SPA Router на чистом JavaScript bytestream 17.02.2025 В современной веб-разработке одностраничные приложения (SPA) стали стандартом для создания динамичных и отзывчивых пользовательских интерфейсов. Ключевым компонентом любого SPA является роутер -. . .	Машинное обучение на TypeScript и TensorFlow bytestream 17.02.2025 Машинное обучение становится все более востребованным направлением в современной разработке программного обеспечения. Интеграция искусственного интеллекта в веб-приложения открывает новые возможности. . .	Манипуляция данными EXIF и JPEG в JavaScript bytestream 17.02.2025 В современном мире цифровой фотографии метаданные изображений играют важнейшую роль в организации и управлении медиаконтентом. Формат EXIF (Exchangeable Image File Format) - это стандарт,. . .	Как создать GUID/UUID в JavaScript bytestream 17.02.2025 GUID (Globally Unique Identifier) и UUID (Universally Unique Identifier) - это специальные форматы 128-битных идентификаторов, которые практически гарантируют уникальность значения во времени и. . .	Что такое мышление в упрощенном смысле (моё субъективное видение, для создания модели). Hrethgir 17.02.2025 Разумеется упрощать смысл есть. Дело в том, что я пришёл к тому выводу, что даже если я создам свой процессор (конвейер), то первое для чего смогу его использовать в качестве демонстративного. . .
Как Node.js устроен изнутри Wired 17.02.2025 Node. js коренным образом изменил подход к веб-разработке, позволив использовать JavaScript не только в браузере, но и на стороне сервера. Созданный в 2009 году Райаном Далем, Node. js представляет. . .	Как обновить Node.js в Windows Wired 17.02.2025 Думаю, многие разработчики сталкивались с ситуацией, когда устаревшая версия Node. js становилась источником проблем - от несовместимости с новыми пакетами до уязвимостей в безопасности. Особенно это. . .	Как обновить Node.js в MacOS Wired 17.02.2025 В Node. js существует несколько подходов к обновлению, каждый из которых имеет свои преимущества и особенности применения. Выбор конкретного метода зависит от ваших потребностей - будь то. . .	Как обновить Node.js в Linux Wired 17.02.2025 Обновление Node. js может показаться сложной задачей, особенно если у вас несколько проектов с разными зависимостями. Однако существует несколько надежных способов обновления, подходящих для разных. . .	[golang] 134. Gas Station alhaos 17.02.2025 Тут нам даны два целочисленных слайса gas и cost, индексы массива представляют собой заправочные станции. а элементы gas это количество топлива на такой станции, cost это количество топлива. . .

@Lena-n1 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 13
		1
	Составить алгоритм для квадратной матрицы.Pascal (Паскаль) 08.11.2010, 11:51. Показов 1994. Ответов 2 Метки нет (Все метки) Помогите пожалуйста решить, очень надо!!! В заданной квадратной матрице размером 10 x 10 построить вектор длиной 19, элементы которого -- максимумы элементов, диагоналей, параллельных главной диагонали. 0

@Lena-n1 0 / 0 / 0 Регистрация: 08.11.2010 Сообщений: 13
	08.11.2010, 13:33 [ТС]	3
	спасибо за алгоритм, но надо еще и блок- схему, не могли бы вы помочь? 0

	08.11.2010, 11:51

Опции темы

Составить алгоритм для квадратной матрицы.Pascal (Паскаль)

Решение