Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Форум программистов и сисадминов Киберфорум > Форум программистов > Pascal (Паскаль) > PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Социальные группы Поиск Сообщения за день Заказать работу  
 
 Аватар для Кудинович
1 / 1 / 0
Регистрация: 10.02.2016
Сообщений: 43

Заполнить массив из 10 элементов случайными числами в интервале [10.20] и найти элемент, равный X

12.02.2016, 20:10. Показов 9615. Ответов 0
Метки нет (Все метки)
Студворк — интернет-сервис помощи студентам
Если кому интересно, вот рабочая, программа домашнего производства.
Задания брал из презентации по основам массивов Паскаль( на сайте Полякова можно найти)

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19

program n3str40;
Var a: Array[1..10] of Byte;
Var i,x: Integer;
begin
For i:= 1 to 10 do begin
 A[i]:= Random(10,20);
 Writeln (A[i]);
 end;
 i:=1;
Writeln ('Что ищем?');
Read(x);
While (i<=10) and ( A[i]<>x) do
i:=i+1;
If i<= 10 then begin
Writeln ('A [',i,'] = ', x);
end
else
Writeln ('Совпадений не найдено');
end.
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
 12.02.2016, 20:10
Ответы с готовыми решениями:

Заполнить массив из 10 элементов случайными числами в интервале
Заполнить массив из 10 элементов случайными числами в интервале и найти в нем 2 максимальных элемента и их номера. Вопрос жизни и...

Заполнить квадратную матрицу случайными числами в интервале [10, 99], и найти максимальный элемент
Пример: Матрица А: 12 14 67 45 32 87 45 63 69 45 14 11 40 12 35 15 Максимальный элемент A=87 Минимальный элемент A=11

Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и отсортировать по убыванию
Заполнить массив из 10 элементов случайными числами в интервале и отсортировать по убыванию.

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
 12.02.2016, 20:10
Помогаю со студенческими работами здесь

Заполнить массив из 10 элементов случайными числами в интервале [-50..50] и отсортировать по убыванию
Заполнить массив из 10 элементов случайными числами в интервале и отсортировать по убыванию

Заполнить массив из 10 элементов случайными числами в интервале [-10..10] и выполнить циклический сдвиг ВПРАВО
ребят у меня оч большая просьба я полностью соответствую названию темы поможете решить задачки) 1: Заполнить массив из 10 элементов...

Заполнить массив из 10 элементов случайными числами в интервале [0.100] и отсортировать первую половину по
Может кому нибудь да пригодится) Стараюсь все делать по шагам и чтобы было понятно каждому. Иногда вижу простые программы, но...

Заполнить массив случайными числами в интервале [0,100] и подсчитать среднее значение элементов
Еще одну задачу помогите, если несложно. Заполнить массив случайными числами в интервале и подсчитайте отдельно среднее значение всех...

Заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать его по последней цифре
Заполнить массив из 10 элементов случайными числами в интервале и отсортировать его по последней цифре. #include &lt;stdio.h&gt; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
1
Ответ Создать тему
Опции темы

Новые блоги и статьи
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Условия использования - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru