and programming. The language of Pascal. The discourse task. by Matt. and instantly.
And yes, the task must be performed in the pascal language.
Applications 1
Work results
Client's review of cooperation with Yura Abrikosov
and programming. The language of Pascal. The discourse task. by Matt. and instantly.Thank you very much, I did it very quickly. I did not take a very simple project. the young
![]()
Freelancer's review of cooperation with client
and programming. The language of Pascal. The discourse task. by Matt. and instantly.Everything went successfully. I recommend it.
-
почему цена такая высокая? давайте сразу за еду
-
Я не понимаю, так ты же выбрал исполнителя...
Ты хочешь поручить одно и тоже задание 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" шифруется нумерация ветвей?
-
Я не понял, а это что было?
-
Current freelance projects in the category Desktop Apps
Modification in the emulator's operation
45 USD
Hello. I downloaded the Gaminator CF Final slot machine emulator from the Internet. I really liked it, but there are some issues. There is an admin panel, but it opens freely and cannot be closed at all. It only closes along with the application. Also, the data does not save… Desktop Apps ∙ 7 days 6 hours back ∙ 10 proposals |
Development of custom software (Android application + CMS) for SUNMI K2 self-service kiosks (Fast food)
22 USD
We are looking for an experienced team or a Middle/Senior Android developer (possibly with Full-stack skills) to create proprietary software for self-service kiosks for a fast food retail chain. Currently, our terminals operate on a ready-made cloud integrator, but we are… Content Management Systems, Desktop Apps ∙ 12 days 1 hour back ∙ 23 proposals |