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