Задать вопрос
19 мая, 22:43

Дан целочисленный массив A размера N. Найти номера тех элементов массива, которые больше

своего правого соседа, и количество таких элементов. Найденные номера выводить в порядке их

возрастания.

На Паскале

+5
Ответы (1)
  1. 20 мая, 00:24
    0
    Const sz=1000;

    var

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

    i, j, n, k:integer;

    begin

    write ('количество чисел') ;

    read (n) ;

    for i:=1 to n do begin

    read (a[i]) ;

    end;

    for i:=1 to n-1 do

    begin

    if (a[i]>a[i+1]) then

    writeln (i) ;

    end;

    end.

    надеюсь это что вам нужно
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Дан целочисленный массив A размера N. Найти номера тех элементов массива, которые больше своего правого соседа, и количество таких ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы