profile
Опубликовано 6 лет назад по предмету Информатика от nonsteam

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

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

  1. Ответ
    Ответ дан pashaklybik

    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]<a[i-1]

      then write(a,' ');

    end;

Самые новые вопросы