Текст мрія ігоря сікорського яке питання ви хотіли б поставити автору текст

program raf105;

var

 a,b: array of integer;

 i,x: integer;

procedure Divide7(x:integer; arr:array of integer);

begin

 arr[0]:= x div 1000000;

 arr[1]:= (x div 100000) mod 10;

 arr[2]:= (x div 10000) mod 10;

 arr[3]:= (x div 1000) mod 10;

 arr[4]:= (x div 100) mod 10;

 arr[5]:= (x div 10) mod 10;

 arr[6]:= x mod 10;

end;

begin

 SetLength(a,7);

 SetLength(b,7);

 writeln('Добро в игру "Лотерея"!');

 write('Введите семизначное число: ');

 readln(x);

 writeln;

 Divide7(x,a);

 x:= random(1000000,9999999);

 Divide7(x,b);

 write('Введённые числа:       ');

 for i:=0 to 6 do

   write(a[i],' ');

writeln;

 write('Сгенерированные числа: ');

   for i:=0 to 6 do

   write(b[i],' ');

end.

program raf105;

var

 a,b: array[1..7] of integer;

 i,x: integer;

begin

 writeln('Добро в игру "Лотерея"!');

 write('Введите семизначное число: ');

 readln(x);

 writeln;

 a[1]:= x div 1000000;

 a[2]:= (x div 100000) mod 10;

 a[3]:= (x div 10000) mod 10;

 a[4]:= (x div 1000) mod 10;

 a[5]:= (x div 100) mod 10;

 a[6]:= (x div 10) mod 10;

 a[7]:= x mod 10;

 x:= random(1000000,9999999);

 b[1]:= x div 1000000;

 b[2]:= (x div 100000) mod 10;

 b[3]:= (x div 10000) mod 10;

 b[4]:= (x div 1000) mod 10;

 b[5]:= (x div 100) mod 10;

 b[6]:= (x div 10) mod 10;

 write('Введённые числа:       ');

 for i:=1 to 7 do

   write(a[i],' ');

 writeln;

 write('Сгенерированные числа: ');

   for i:=1 to 7 do

   write(b[i],' ');

end.

#include <iostream>

#include <vector>

using namespace std;

int main()

{

  int x, y;

  cin >> x >> y;

  vector<vector<int> > t(x, vector<int> (y));

  for (int i = 0; i < x; ++i){

      for (int j = 0; j < y; ++j){

           int mark;

           cin >> mark;

           t[i][j] = mark;

      }

  }

  for (int i = 1; i < y; ++i){

       t[0][i] += t[0][i - 1];

  }

  for (int i = 1; i < x; ++i){

       t[i][0] += t[i - 1][0];

  }

  for (int i = 1; i < x; ++i){

      for (int j = 1; j < y; ++j){

           t[i][j] += min(t[i - 1][j], t[i][j - 1]);

      }

  }

  cout << t[x - 1][y - 1] << endl;

}

Объяснение: