Составить программу одномерного массива.подсчитать количество чисел,не принадлежащих...

0 голосов
80 просмотров

Составить программу одномерного массива.
подсчитать количество чисел,не принадлежащих промежутку (х,у]


Информатика (15 баллов) | 80 просмотров
0

в массиве сколько значений? и массив вводиться?

0

сейчас исправлю

0

Паскаль

0

Да сначала n,потом массив,а потом х и у

0

есть пример ввода?

0

а х и у?

0

исходный одномерный массив

0

и как вводится? сначала n, потом массив? а потом х и у?

0

то есть может быть вещественный?

0

Про массив ничего не сказано

Дано ответов: 2
0 голосов
Правильный ответ

Program Program1;
var Arr: array[-100..100] of integer;
Arr2: array[-100..100] of integer;
i, n, x, y: integer;
begin
     randomize;
     write('Введите количество элементов в массиве: ');
     readln(n);
     for i := 1 to n do Arr[i] := random(100) - random(100);
     writeln('Весь массив: ');
     for i := 1 to n do write(Arr[i], ' ');
     writeln();
     write('Введите X и Y: ');
     read(x, y);
     for i := 1 to x - 1  do write(Arr[i], ' ');
     for i := y + 1 to n  do write(Arr[i], ' ');
end.

(630 баллов)
0

Обалдеть!!! Кто-то из нас двоих перегрелся: или я (потому, что считаю решение неправильным) или Слим (написал не то)! ))))

0

массив вводится. и мне кажется, что не индекс элемента не должен принаждлежать промежутку, а само значение эелемента

0

Надеюсь, вопрос еще актуален, готово.

0

Упс, только сейчас внимательно перечитал, что НЕ принадлежащих, извините, сейчас все будет.

0

кажется)

0

вам не кажется)

0

Вот и мне так кажется)

0

бред какой-то

0

Спасибо огромное задача уже решена)

0 голосов

Во вложении
спрашивайте, что непонятно

(17.7k баллов)