Если в прямоугольной матрице меньше половины столбцов содержит отрицательные элементы, то все элементы с нечетными номерами столбцов умножить на 10. в противном случае все отрицательные элементы матрицы возвести в квадрат. у меня получилось вот что: program s455; uses crt; const m=10; n=12; var a: array[1..m, 1..n] of integer; i, j, k, s: integer; begin writeln('enter size'); readln; s: =0; for j: =1 to m do begin k: =0; for i: =1 to n do end; begin if a< 0 then begin k: =1; end; if k=1 then s: =s+1; end; begin; if k< 0 then a[i, j]: =a[i, j*2-1]*10; else a[i, j]: =a[i, j]*c [i, j] end; writeln не могу понять в чем ошибка

Var a: array [1..100,1..100] of longint ; i, j ,d, n,m,k: longint; beginread(n,m); for i: =1 to n do  for j: = 1 to m doread(a[i,j]); j: =0;         for i: =1 to n do        begin        j: =j+1;         d: =0;                   while d< 2 do                  if a[i,j]< 0 then begin k: =k+1; d: = 3; end;         end; if k> (m/2) then        begin        for i: = 1 to n do                  for j: = 1 to m do                  if a[i,j]< 0 then a[i,j]: =a[i,j]*10 ;         end else begin        for i: =1 to n do          for j: = 1 to m do          if a[i,j]< 0 then a[i,j]: =a[i,j]*a[i,j] ; end; for i: =1 to n dobegin  for j: = 1 to m dowrite(a[i,j],' '); end; end.

#include <bits/stdc++.h>

using namespace std;

long long a,b,c,A,B,count1=0;

long long min1;

int main()

{

   cin>>A>>B;

   for(int i=B-1;i>A;i--){

       cout<<i<<" ";

       count1++;

   }

   cout<<endl;

   cout<<count1<<endl;

   return 0;

}

Объяснение:

Програма написана на c++, я думаю ти напишеше на пайтоні тому, що у моєму варінті показано як це усе має працювати.

1.Спочатку ти вводиш 2 цілих числа. //cin>>A>>B;

2.Робиш цикл від B до A

3. Виводиш i(це може бути люда змінна)

4.Лічильник++

5.cout<<endl;  я роблю пропуск, для удобства.

6.Вивожу лічильник на екран

Program prog; uses crt; var a,b,c,x,y: real; begin clrscr; write('ребро параллелепипеда а = '); readln(a); write('ребро параллелепипеда b = '); readln(b); write('ребро параллелепипеда c = '); readln(c); writeln; write('сторона отверстия х = '); readln(x); write('сторона отверстия y = '); readln(y); writeln; if ((a< x) and (b< y)) or ((a< x) and (c< y)) or ((c< x) and (b< y)) or ((b< x) and (a< y)) or ((c< x) and (a< y)) or ((b< x) and (c< y)) then writeln('может пройти') else  writeln('не может пройти'); end.