Дано естественное число N ,и последовательных целых чисел,каждое из которых лежит
Дано естественное число N ,и последовательных целых чисел,каждое из которых лежит в спектре от 0 до 255.Найти все числа из заданного промежутка,которые не входят в последовательность(Паскаль.Решить с внедрением огромного количества и рандома)
Задать свой вопрос
Дарина Шмачилина
а как интервал задается?
Нелли
всмысле
Леонид Романи
плиз
Василиса Видякова
у тебя только про число n написано интервал 2-мя числами задается
Виталя Смешенко
да
Дубнякова
Элина
Сюда могу кинуть
Борис Карильо-Архас
спасибо
1 ответ
Щелбанина
Виолетта
Var MyAr:array[1..100]of byte;
MN1: Set of byte;
j, i, N: integer;
begin
Write('N= ');
read(N);
for i := 1 to N do
MyAr[i] := random(256);
write('Массив А=');
for i := 1 to N do
write(MyAr[i], ' ');
MN1 := [];
for i := 1 to N do
MN1 := MN1 + [MyAr[i]];
j := 0;
begin
for i := 0 to 255 do
if i in MN1 then
j := j + 1;
write(j);
end;
end.
MN1: Set of byte;
j, i, N: integer;
begin
Write('N= ');
read(N);
for i := 1 to N do
MyAr[i] := random(256);
write('Массив А=');
for i := 1 to N do
write(MyAr[i], ' ');
MN1 := [];
for i := 1 to N do
MN1 := MN1 + [MyAr[i]];
j := 0;
begin
for i := 0 to 255 do
if i in MN1 then
j := j + 1;
write(j);
end;
end.
Иван Аглушевич
Вот
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
выпиши в свою тетрадь те правила этикета которые тебе не были
Разные вопросы.
Анна хорошо учится у неё много подруг свободное от учёбы время
Обществознание.
10) Килограмм конфет дороже килограмма печенья на 52 р. За 8
Математика.
Во сколько раз число атомов кислорода в земной коре больше числа
Химия.
Облако тегов