Programowanie . Język Pascal. Zadaniem jest dysk. Matka . Wkrótce .
Zadania muszą być wykonywane w języku pascal.
Załączniki 1
Plik z rezultatem
Opinia zleceniodawcy o współpracy z Yura Abrikosov
Programowanie . Język Pascal. Zadaniem jest dysk. Matka . Wkrótce .Bardzo dziękuję, wykonano bardzo szybko. To nie jest bardzo prosty projekt. Młody
![]()
Opinia freelancera o współpracy z ze zleceniodawcą
Programowanie . Język Pascal. Zadaniem jest dysk. Matka . Wkrótce .Wszystko przeszło z powodzeniem. Polecam .
-
почему цена такая высокая? давайте сразу за еду
-
Я не понимаю, так ты же выбрал исполнителя...
Ты хочешь поручить одно и тоже задание 2-м человекам?
-
А ты вообще теорию знаешь?
Я просмотрел методичку и отметил для себя, что я в этой теории ничего не понимаю, много незнакомых слов. Что такое ПИЭ-1, ПИМ-1 , ИБ-2. Что такое "А" "F"?
"A" - смежности? А необходимо представить, один и тот же граф, в виде "F"?
-
Я попробую запрограммировать на Паскале то, что но описал.
-
Вроде набросал.
program D_H;
Type
vector_F=array [1..5] of integer;
matrix_D=array [1..5,1..5] of integer;
matrix_H=array [1..5,1..6] of integer;
Var
F : vector_F;
D : matrix_D;
H : matrix_H;
i,j,k: integer;
M,N: integer;
v: integer;
Begin
M:=5;
N:=6;
D[1,1]:=0;D[1,2]:=0;D[1,3]:=0;D[1,4]:=0;D[1,5]:=0;
D[2,1]:=4;D[2,2]:=0;D[2,3]:=0;D[2,4]:=0;D[2,5]:=0;
D[3,1]:=1;D[3,2]:=4;D[3,3]:=0;D[3,4]:=0;D[3,5]:=0;
D[4,1]:=1;D[4,2]:=0;D[4,3]:=0;D[4,4]:=0;D[4,5]:=0;
D[5,1]:=3;D[5,2]:=4;D[5,3]:=0;D[5,4]:=0;D[5,5]:=0;
writeln ('Matrix D:');
for i:=1 to M do
begin
for j:=1 to M do
begin
write (' ');
write (D[i,j]);
end;
writeln;
end;
writeln;
for i:=1 to M do
begin
F[i]:=0;
for j:=1 to M do
begin
H[i,j]:=0;
end;
end;
k:=1;
for i:=1 to M do
begin
for j:=1 to M do
begin
If D[i,j]>0 then
begin
v:=D[i,j];
F[i]:=F[i]+1;
H[i,F[i]]:=k;
F[v]:=F[v]+1;
H[v,F[v]]:=-k;
k:=k+1;
end;
end;
end;
writeln ('Matrix H:');
for i:=1 to M do
begin
for j:=1 to M do
begin
write (' ');
write (H[i,j]);
end;
writeln;
end;
writeln;
End.
В результате номера ветвей не те, что ты определил:

Можно ли в "D" заменить нумерацию ветвей?
А где в "D" шифруется нумерация ветвей?
-
Я не понял, а это что было?
-
Aktualne zlecenia dla freelancerów w kategorii Aplikacje desktopowe
Modyfikacja w pracy emulatora
164 PLN
Witaj. Ściągnąłem z Internetu emulator automatu do gier gaminator cf final. Bardzo mi się podoba, ale są tam niedociągnięcia. Jest panel administracyjny, ale otwiera się swobodnie, a nie zamyka w ogóle. Zamyka się tylko razem z aplikacją. A dane po zmianach w panelu… Aplikacje desktopowe ∙ 5 dni 14 godzin temu ∙ 10 ofert |
Opracowanie niestandardowego oprogramowania (aplikacja na Androida + CMS) dla kiosków samoobsługowych SUNMI K2 (fast food)
82 PLN
Szukamy doświadczonego zespołu lub programisty Android na poziomie średnim/zaawansowanym (możliwe, że z umiejętnościami Full-stack) do stworzenia własnego oprogramowania dla kiosków samoobsługowych sieci fast food. Obecnie nasze terminale działają na bazie gotowego chmurowego… Content Management Systems, Aplikacje desktopowe ∙ 10 dni 10 godzin temu ∙ 23 oferty |