Срочно решите!

Дан одномерный массив, который содержит не более 10 целых чисел. Вывести только те элементы, которые меньше предыдущего

var i:integer;

a:array[1..10]of integer;

begin

for i;=1 to 10 do

read(a[i]);

for i:=1 to 10 do

 if a[i]

  then write(a, );

end;

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку