Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Evgeniy63
0 / 0 / 0
Регистрация: 29.04.2015
Сообщений: 28
#1

Вывод случайного ЭЛЕМЕНТА из массива

06.08.2017, 16:35. Просмотров 411. Ответов 2
Метки нет (Все метки)

Т.е. не массива с рандомными числами, а именно одного-единственного случайного элемента, значения заданы по умолчанию, помогите пожалуйста, это организовать, мой код:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
uses crt;
 
var a: array[1..32] of real; i, n: byte;
begin
clrscr;
randomize;
  for i := 1 to 32 do
a[1]:=0.03;
a[2]:=0.05;
a[3]:=0.1;
a[4]:=0.15;
a[5]:=0.2;
a[6]:=0.3;
a[7]:=0.4;
a[8]:=0.5;
a[9]:=1;
a[10]:=2;
a[11]:=3;
a[12]:=4;
a[13]:=5;
a[14]:=6;
a[15]:=7;
a[16]:=8;
a[17]:=9;
a[18]:=10;
a[19]:=11;
a[20]:=12;
a[21]:=13;
a[22]:=14;
a[23]:=15;
a[24]:=16;
a[25]:=17;
a[26]:=18;
a[27]:=19;
a[28]:=20;
a[29]:=21;
a[30]:=22;
a[31]:=23;
a[32]:=24;
 
  writeln(a[i]);
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
06.08.2017, 16:35
Ответы с готовыми решениями:

вывод на экран случайного одномерного массива,ввод с клавиатуры одномерного массива и вывод его на экран.и все это в одной проге.как это сделать?
надо чтобы при запуске прграммы в паскале сначала вывелся на кран одномерный...

Вывод номера элемента массива, который равен заданому числу
Добрый день!) Прошу помоч мне с програмкой) Как вывести нужный мне элемент с...

Вывод массива, каждые три последовательных элемента в строке которого составлены по правилу
2.Напишите программу формирования и вывода массива размером 6x3, каждые три...

Поиск максимального элемента массива в функции и вывод всех результатов на экран и в файл
Всем привет! Задача следщая: 1. Сформировать двумерный массив F размером 8 x 8...

Ввод элементов массива ,вещественных чисел и вывод в виде матрицы, определение максимального элемента
Разработать алгоритм и составить программу, выполняющей ввод элементов массива...

2
Puporev
Модератор
54387 / 41968 / 28988
Регистрация: 18.05.2008
Сообщений: 98,861
06.08.2017, 17:32 #2
Pascal
1
2
3
4
5
6
7
8
9
10
uses crt;
const n=32;
      a:array[1..n] of real=(0.03,0.05,0.1,0.15,0.2,0.3,0.4,0.5,1,2,3,4,5,6,7,8,
                              9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24);
begin
clrscr;
randomize;
writeln('Случайный элемент массива  ',a[1+random(n)]:0:2);
readln
end.
0
Evgeniy63
0 / 0 / 0
Регистрация: 29.04.2015
Сообщений: 28
06.08.2017, 18:41  [ТС] #3
Все работает, спасибо большое
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
06.08.2017, 18:41

Поменять местами значение первого четного элемента массива со значением последнего нечетного элемента массива.
Дан массив С(30). Поменять местами значение первого четного элемента массива со...

номера минимального элемента массива и элемента, являющегося минимальным без учета этого элемента
11.109. Дан массив. Определить: а) максимальный элемент массива и элемент,...

Найти среднее арифметическое до минимального элемента и после максимального элемента массива
Дан массив F(11). найти среднее арифметическое до минимального элемента и после...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru