Напишите программу, которая считает количество дорог в городе Новые Васюки. Схема дорог задана как матрица смежности графа. На некоторых дорогах введено одностороннее движение. входные данные
5
0 1 1 1 0
1 0 1 0 1
1 1 0 1 0
0 0 0 0 0
0 1 0 1 0
выходные данные
7

program xxx;

var n, c, d, e, k : integer;

begin

  wtite ('введите 3-х значное число n =');

  readln (n);

  c : = n div 100;

  d : = (n div 10) mod 10;

  e : = n mod 10;

  k: = 100*e + 10*d + c;

  if n = k then write ('палиндром') else write('не палиндром')

end.

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

t1 = s1/v1

t2 = s2/v2

v(sr) = (s1+s2)/(t1+t2)

необходимо (но не достаточно).