99

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

22 марта 2023

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

категория: информатика



77

uses crt; var i,n,count: integer; a: array[1… 100] of integer; beginread (n); for i: =1 to n doread (a[i]); writeln ('Номера элементов: '); for i: =1 to n-1 doif a[i]>a[i+1] thenbeginwrite (i,'); count: =count+1; end; writeln (#13#10,'Всего элементов: ',#13#10,count); end.

Знаете ответ?


Есть интересный вопрос? Задайте его нашему сообществу, у нас наверняка найдется ответ!
Делитесь опытом и знаниями, зарабатывайте награды и репутацию, заводите новых интересных друзей!
Задавайте интересные вопросы, давайте качественные ответы и зарабатывайте деньги. Подробнее...