Дан массив х (n) . переписать в массив y(n) отрицательные элементы массива х умноженные на 2. (со сжатием., без пустых элементов внутри) затем упорядочить методом «выбора и перестановки»по возрастанию новый массив.

Program gt; var x,y: array[1..1000]of integer; k,n,i,j,r: integer; begin read(n); k: =0; for i: =1 to n do begin read(x[i]); if(x[i]< 0)then begin k: =k+1; y[k]: =x[i]*2; end; end; for i: =1 to k do begin for j: =1 to k-i do begin r: =y[j]; if(y[j]> y[j+1])then begin y[j]: =y[j+1]; y[j+1]: =r; end; end; end; for i: =1 to k do begin write(y[i],' '); end; end.это метод пузырка

var

n: integer;

begin

readln(n);

if (n mod 10)=(n div 100) then

writeln('палиндром')

else

writeln('не палиндром');

end.

пусть х(мин)-потратела времени на выполнение д/з вчера

имеем уравнение:

х+х-10=60

2х=60+10

2х=70

х=70/2

х=35

35(мин)-потратела времени на выполнение д/з вчера