2) дан целочисленный массив из 20 элементов, все элементы которого – целые числа в интервале от -1000 до 1000. опишите на языке или на одном из языков программирования алгоритм, который находит минимальное значение из всех нечетных элементов массива, которые делятся на 5.

var a: array [1..100] of integer; n,k,i,j: integer; begin {вводим} for i: =1 to 20 do {элементы} read (a[i]); {массива} for j: =1 to n-1 do {сортируем элементы массива по возрастанию,} for i: =1 to n-j do if a[i] > a[i+1] then begin k: =a[i]; a[i]: =a[i+1]; a[i+1]: =k; end; {то есть от самого маленького до самого большого} for i: =1 to 20 do {выполняем заданное условие} if ((a[i] mod 2)=1) and ((a[i] mod 5)=0) then begin writeln ('требуемое значение ',a[i]); break; end; end.

Uses graphabc; beginsetpenwidth(3); setwindowsize(600,700); ellipse(120,350,280,480); circle(200,300,60); circle(200,210,40); line(170,90,230,90); line(160,180,240,180); line(170,90,160,180); line(230,90,240,180); floodfill(200,173,clblack); floodfill(200,123,clblack);   setbrushcolor(clblack); circle(190,200,5); circle(210,200,5); line(200,210,220,220); line(200,220,220,220); line(200,210,200,220); floodfill(204,214,clblack); setpenwidth(5); arc(200,230,10,180,0); line(70,320,170,250); line(230,250,330,300); line(300,450,350,200); line(350,200,320,140); line(350,200,340,140); line(350,200,360,140); line(350,200,380,140); line(350,200,400,140); end.

В  паскале одномерный  массив  описывается так:                                   var  < имя  массива> : array[n1..n2]  of < тип  переменной> ,  n1  <   n2, а двумерный так:                         var < имя массива> : array[n1..n2,m1..m2] of < тип переменной> , n1 < n2,  m1  < m2. значит,  правильный  ответ - с  и  последний.