sdgsdgsdgsdgsdg228
06.03.2023 03:20

Нуужно решение по pascal abc объявить массив n x n. заполнить его следующим образом: если между с номерами i и j есть дорога, то a ij =1. для каждого города вывести число смежных с ним городов и их номера. вычислить размер матрицы инци-дентности, заполнить ее для данного графа и вывести на экран.

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
danyaaseev2006
11.09.2020 01:31

Если я правильно понял то вот (Pascal ABC)

const n=6;

var i,j:byte;

   a:array[1..n,1..n] of byte;

begin

for i:=1 to n do

begin

 for j:=1 to n do

  begin

   if j<=n-i+1 then a[i,j]:=n-j+1

   else a[i,j]:=0;

   write(a[i,j]:3)

  end;

 writeln

end

end.

0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота