Определите значение переменной а после выполнения алгоритма a: =100 b: =50 b: =a- b/2 a: =a/5+b/3

В=а-в/2=100-50/2=75  а=а/5+в/3=100/5+75/3=20+25=45

Int main() {int n; cin > > n; switch (n)     {case 1 : cout < < "январь" ; break; case 2 :   cout < < "февраль" ; break; case 3 :   cout < < "март" ; break; case 4 :   cout < < "апрель" ; break; case 5 :   cout < < "май" ; break; case 6 :   cout < < "июнь" ; break; case 7 :   cout < < "июль" ; break; case 8 :   cout < < "август" ; break; case 9 :   cout < < "сентябрь" ; break; case 10 :   cout < < "октябрь" ; break; case 11 :   cout < < "ноябрь" ; break; case 12 :   cout < < "декабрь" ; break; default: cout < < "такого месяца нет"; } return 0; }

// pascalabc.net 3.1, сборка 1239 от 08.05.2016 begin   var m: =readinteger('число строк=');   var n: =readinteger('число стролбцов=');   var a: =matrixrandom(m,n,-99,99);   var imax: =-1; var jmax: =0;   var imin: =0; var jmin: =0;   var min: =100; var max: =-100; // больше большего, меньше меньшего   for var i: =0 to m-1 do begin       for var j: =0 to n-1 do begin           write(a[i,j]: 4);           if (a[i,j]> 0) and (a[i,j] mod 2=0) then begin               if a[i,j]< min then begin imin: =i; jmin: =j; min: =a[i,j] end;               if a[i,j]> max then begin imax: =i; jmax: =j; max: =a[i,j] end               end           end;       writeln       end;   if imax< > -1 then begin       writeln('минимальный четный положительный элемент a[',               imin+1,',',jmin+1,']=',a[imin,jmin]);       writeln('максимальный четный положительный элемент a[',           imax+1,',',jmax+1,']=',a[imax,jmax])       end   else       writeln('в массиве нет положительных четных элементов') end. тестовое решение число строк= 5 число стролбцов= 8   -59  98  55 -92 -98  68    5 -82   63  49  41    7  51  22  55  -4   -78  42 -35 -60  -6 -15 -34 -28   -14  55 -44  22  74 -50 -98  85   50    2  65  39 -47 -59  -7 -87 минимальный четный положительный элемент a[5,2]=2 максимальный четный положительный элемент a[1,2]=98