Решить и написать программу на C#!
Задача «Суммарная длина дорог»
Найдите суммарную длину всех дорог в городе Новые Васюки. Схема дорог задана в виде весовой матрицы графа. На некоторых дорогах введено одностороннее движение. Если длины дорог из пункта А в пункт Б разные, это означает, что есть две разные дороги.
Входные данные
В первой строке вводится количество перекрёстков в Новых Васюках N ( 1 ≤ N ≤ 1000 ). В следующих N строках записано по N чисел, разделённых пробелами – длины дорог между каждой парой перекрёстков. Ноль означает, что дороги между этими перекрёстками нет.
Выходные данные
Программа должна вывести одно число – суммарную длину дорог. Дороги с двусторонним движением нужно считать только один раз.
Примеры
входные данные
5
0 2 3 4 0
2 0 5 0 7
3 6 0 8 0
0 0 0 0 0
0 7 0 9 0
выходные данные
44
Для кнопки (Button1) процедура onClick
Створюємо поле вводу
Створюємо текстове поле
procedure TForm1.Button1Click(Sender: TObject);var x: real;begin x:= StrToFloat(Edit1.Text);if Edit1.Text = '1'then Label1.Caption:= 'Январь';if Edit1.Text = '2'then Label1.Caption:= 'Февраль';if Edit1.Text = '3'then Label1.Caption:= 'Март';if Edit1.Text = '4'then Label1.Caption:= 'Апрель';if Edit1.Text = '5'then Label1.Caption:= 'Май';if Edit1.Text = '6'then Label1.Caption:= 'Июнь';if Edit1.Text = '7'then Label1.Caption:= 'Июль';if Edit1.Text = '8'then Label1.Caption:= 'Август';if Edit1.Text = '9'then Label1.Caption:= 'Сентябрь';if Edit1.Text = '10'then Label1.Caption:= 'Октябрь';if Edit1.Text = '11'then Label1.Caption:= 'Ноябрь';if Edit1.Text = '12'then Label1.Caption:= 'Декабрь';end;
end.