Найдите исполнителя для вашего проекта прямо сейчас!
Разместите заказ на фриланс-бирже и предложения поступят уже через несколько минут.

Произошло радиоактивное заражение местности.Составлена карта зараженности.Она представляет собой прямоугольную таблицу N x M, в клетках которой записана зараженность соответствующего участка. Требуется найти путь из левой верхней клетки в правую нижнюю клетку с минимальной суммарной дозой радиации.

Например матрица.

0 2 2 2 2 2

1 0 1 0 0 1

2 2 2 0 2 2

2 2 2 0 1 0

Ну и вот она(программа) должна найти этот путь. Потом 0 + 1 + 0 + 1+ 0 + 0 + 0 + 1 + 0 = 3

И потом сверяла если вы вписали в textbox 3 всё верно иначе проиграл.

Мне очень надо сделать эту задачу а то на 2 курс не перейду помогите, буду очень признателен.

C#(windows form)

Есть готовая на паскале если кому будет легче:

Const InputFile='Input.txt' ;

OutputFile='Ouput.txt' ;

MaxN=30;

Dx: Array[1..4] Of Integer=(0, 0,-1, 1);

Dy: Array[1..4] Of Integer=(-1, 1, 0, 0);

Var A, Mn: Array[1..MaxN, 1..MaxN] Of Integer;

N,M, res:Integer;

i,j:Integer

Procedure GetMin(Var si,sj:Integer);

Var i,j,min:Integer;

Begin

min=:MaxInt; si:=1; sj:=1;

For i:=1 To N Do

For i:=1 To M Do

If (Mn[i,j]>0) And (Mn[i,j]

si:=i;sj=j;min:=Mn[i,j]

End

End;

Procedure Solve;

Var i,j,k,si,sj,ni,nj:Integer;

Begin

Mn[1, 1]:=A[1, 1];

For j:=1 To N*M-1 Do Begin

GetMin (si, sj);

For k:=1 To 4 Do Begin

ni:=si+Dx[k];nj:=sj+Dy[k];

If (ni0) And (nj0) And (Mn[ni,nj]>-0) Then Begin

If (Mn[ni,nj]-0) Or (Mn[si,sj]+A[ni,nj]

Then Mn[ni, nj]:=Mn[si,sj]+A[ni,nj];

End

End;

Mn[si,sj]:=-Mn[si,sj]

End;

res:=Abs(Mn[N,M])

End;

Begin

Assing (Imput, InputFile);Reset(Input);

Read(N, M);

For i:=1 To N Do

For j:=1 To M Do Read(A[i,j]);

Close(Input);

FillChar(Mn, SizeOf(Mn),0);

Solve;

Assing(Output, OutputFile);Rewrite(Output);

WriteLn(res);

Close(Output)

End.

11 лет назад
mishan358
Михаил 
41 год
11 лет в сервисе
Был
4 месяца назад
3 отзыва

Выбранный исполнитель

shytnik_igor
Игорь 
34 года
12 лет в сервисе
Был
год назад
11 лет назад
$25
1 день
Работу выполнил довольно быстр раньше срока качественно,всё что требовалось сделал.Приятно было сотрудничать.
Отличный заказчик, хороший проект, быстрая оплата.

Заявки фрилансеров

shytnik_igor
Игорь 
34 года
12 лет в сервисе
Был
год назад
11 лет назад
  • Похожие заказы

  • $100

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

    Закрыт
    11 лет назад
  • Требуется грабер фотографий ВКонтакте. Что данный софт должен делать: 1. Выбираю страну (страны должны подгружаться с сайта) 2. Выбираю город (города должны подгружаться с сайта в зависимости от выбранной страны)) 3. ...

    Закрыт
    11 лет назад
  • Ищем разработчиков ПО. Интересуют платформы - Android, IOS, MACOS, Windows-mobile. Графический интерфейс есть. Его логика в аттаче. Цель - открытие домофонных дверей, на которые параллельно с обычным домофоном устанавливается наша плата, которая ...

    Закрыт
    11 лет назад
  • Нужна программа для переименования файлов по списку слов. ТЗ: 1. Программе задается список слов и указывается папка с файлами. 2. Программа переименовывает файлы в папке и подпапках. 3. Если слова ...

    Прикладное ПО1 исполнитель
    Завершен
    11 лет назад
  • $500

    Требуется человек, хорошо знающий ассемблер, для написания модуля предзагрузки к средству защиты информации от несанкционированного доступа. Список требований к задаче указан в ТЗ (прикреплённый файл). Для более подробной информации обращаться по почте [email protected]

    Прикладное ПОнет заявок
    Закрыт
    11 лет назад
  • надо сделать программу к курсовой на С++ срок-стоимость? Программа должна использовать динамический массив данных о сотрудниках организации. По каждому сотруднику в программу вводится следующая информация: - ...

    Прикладное ПО1 исполнитель
    Завершен
    11 лет назад
  • $100

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

    Прикладное ПО1 исполнитель
    Завершен
    11 лет назад
  • Здравствуйте, есть необходимость разработать модуль рекламной заставки в web-сервер продукта компании MACROSCOP. Есть сервер видеонаблюдения, у пользователей есть возможность обращаться к этому серверу для просмотра видео реального времени через любой браузер с поддержкой Silverlight. ...

    Закрыт
    11 лет назад