Получение третьего массива из двух - 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++; } } } }
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д