Question

Даны массив А(13),состоящий из элементов,среди которых есть положительные,отрицательные и равные нулю. Напечатать те числа из массива,которые меньше предыдущего числа.

Answer 1

не знаю какой конкретно язык нужен (напишу в общих чертах) 
A - массив
нужно лишь одно условие 
for i=1 to 12 do
if A[i]>A[i+1] then print A[i+1]

Answer 2

нужна прогр в паскале

Answer 3

каюсь, не помню паскаль, но что-то в мозну осталось:
program lala
var A[1..13]:array of integer;
i:integer;
begin
for i:=1 to 13 do
writeln(A[i]);
for i:=1 to 12 do
if (A[i]>A[i+1] then write(A[i+1])
end.