Получение третьего массива из двух - C#
Формулировка задачи:
Даны два двумерных массива из 12 строк и 28 столбцов. В первом из них записано количество осадков (в мм), выпавших за каждый из первых 28 дней каждого месяца 2009 года, во втором — аналогичные сведения за 2010 год. Получить третий массив с данными об изменении количества осадков для каждого дня (в мм).
И сразу аналогичная задача но на паскале которую нужно перевести
uses crt;
const nmax=20;
const n=12;
m=28;
var a,b,c:array[1..n,1..m] of integer;
i,j:byte;
begin
clrscr;
writeln('ГЊГ*Г±Г±ГЁГў A:');
for i:=1 to n do
begin
for j:=1 to m do
begin
a[i,j]:=random(20)-5;
write(a[i,j]:4);
end;
writeln;
end;
writeln;
writeln('ГЊГ*Г±Г±ГЁГў B:');
for i:=1 to n do
begin
for j:=1 to m do
begin
b[i,j]:=random(20)-5;
write(b[i,j]:4);
end;
writeln;
end;
writeln;
write('ГЌГ*æìèòå Enter äëÿ ïðîäîëæåГ*ГЁГї');
readln;
writeln('Òðåòèé Г¬Г*Г±Г±ГЁГў:');
for i:=1 to n do
begin
for j:=1 to m do
begin
c[i,j]:=b[i,j]-a[i,j];
write(c[i,j]:4);
end;
writeln;
end;
readln
end.program sds;
var a:array[1..20,1..2] of integer;
i,j,t:integer;
f1, f2: text;
begin
assign(f1,'1.in');
reset(f1);
assign(f2,'1.out');
rewrite(f2);
for i:=1 to 15 do
for j:=1 to 2 do
readln(f1,a[i,j]);
for i:=15 downto 1 do
if i mod 3=0 then
begin
for t:=20 downto i+1 do
for j:=1 to 2 do
a[t,j]:=a[t-1,j];
for j:=1 to 2 do
a[i+1,j]:=0;
end;
for i:=1 to 20 do
begin
for j:=1 to 2 do
write(f2,'A[',i:2,',',j:2,'] ',a[i,j]:4,' ');
writeln;
end;
close(f1);
close(f2);
end.Решение задачи: «Получение третьего массива из двух»
textual
Листинг программы
using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;
using System.Threading.Tasks;
namespace rainfall
{
class Program
{
static void Main(string[] args)
{
Random rnd = new Random();
int n = 12, m = 28, nmax = 20;
int[,] a = new int[n, m];
int i = 0;
Console.Write("Маcсив А:\n");
while (i < n)
{
for (int j = 0; j < m; j++)
{
a[i, j] = rnd.Next(0, 20) - 5;
Console.Write(String.Format("{0,4:#}", a[i, j]));
}
Console.Write("\n");
i++;
}
Console.Write("Маcсив В:\n");
int[,] b = new int[n, m];
i = 0;
while (i < n)
{
for (int j = 0; j < m; j++)
{
b[i, j] = rnd.Next(0, 20) - 5;
Console.Write(String.Format("{0,4:#}", b[i, j]));
}
Console.Write("\n");
i++;
}
Console.Write("Нажмите Enter для продолжения");
Console.ReadKey();
Console.Write("\nТретий маcсив:\n");
int[,] с = new int[n, m];
i = 0;
while (i < n)
{
for (int j = 0; j < m; j++)
{
с[i, j] = b[i, j] + a[i, j];
Console.Write(String.Format("{0,4:#}", с[i, j]));
}
Console.Write("\n");
i++;
}
}
}
}