Переписать программу c Pascal на С#. Заполнение массива по спирали - C#

Узнай цену своей работы

Формулировка задачи:

Необходимо переписать программу с Pascal на С#. Эта программа заполняет массив по спирали.
var
s:array[1..n,1..m] of integer;
i,j,k,p:integer;
begin
i:=0; k:=0; p:=1;
while i<n*m do
begin
k:=k+1;
for j:=k to m-k+1 do
begin 
i:=i+1;
s[k,j]:=p;
p:=p+1;
end;
for j:=k+1 to n-k+1 do
begin
i:=i+1;
s[j,m-k+1]:=p;
p:=p+1;
end;
for j:=m-k downto k do
begin
i:=i+1;
s[n-k+1,j]:=p;
p:=p+1;
end;
for j:=n-k downto k+1 do
begin
i:=i+1;
s[j,k]:=p;
p:=p+1;
end
end;
for i:=1 to n do
begin
for j:=1 to m do
write(s[i,j]:4,' ');
writeln
end
end.

Решение задачи: «Переписать программу c Pascal на С#. Заполнение массива по спирали»

textual
Листинг программы
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

8   голосов , оценка 4.25 из 5