Нужно написать программку подсчета числа разных частей одномерного массива A(Q)

Требуется написать программку подсчета числа различных частей одномерного массива A(Q) принадлежащий отрезку (R..P). (Паскаль)

Задать свой вопрос
1 ответ
Var x,i,n,p,r,kol:integer;beginread(n,r,p);for i:=1 to n do begin   read(x);   if (xgt;r) and (xlt;p) then inc(kol)   end;writeln(kol);end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт