Функция Random

[Викаа-008]

В массив A[N] занесены натуральные числа. Вывести на экран индексы элементов, которые больше данного k.

Program kj;
const
n=20;
var
a:array [1..n] of integer;
k:integer;
i,j:integer;
begin
readln(k);
for i:=1 to n do
a[i]:=random(20);
for i:=1 to n do
if a[i]>k then writeln(i);
end.


Объясните ,пожалуйста, решение задачи.
что конкретно в этой задаче делает функция random?
И правильно ли написана задача? Когда я набираю ее в паскале.. и например ввожу k=5.. он выводит цифры например 3.. а 3 вовсе не больше k=5.. или я не так что-то понимаю? Заранее спасибо.

[Базиля]

Так правильно, ты выводишь индекс массива, а не сам элемент... исправь writeln(i); на writeln(a[i]);
Функция random у тебя заполняет случайно массив A элементами в диапазоне от 0 до 20.
Задача выводит элементы массива которые больше введенго k, по циклу смотрим, если очередной элемент массива больше к то выводим его. Здесь все просто, сложного ничего нет

[iBuTTHead]

Сообщение от Базиля

Так правильно, ты выводишь индекс массива, а не сам элемент... исправь writeln(i); на writeln(a[i]);
Функция random у тебя заполняет случайно массив A элементами в диапазоне от 0 до 20.
Задача выводит элементы массива которые больше введенго k

В начале тела программы напишите
randomize;

[Викаа-008]

Спасибо))))

[Викаа-008]

А что такое randomize и random? Чем они отличаются? И зачем они нужны? что-то не могу разобраться.. random это вроде генератор случайных чисел или что?

[iBuTTHead]

Сообщение от Викаа-008

А что такое randomize и random? Чем они отличаются? И зачем они нужны? что-то не могу разобраться.. random это вроде генератор случайных чисел или что?

Функция Random: Возвращает случайное число.

На счет рэндомайза точно сказать не могу но вроде, он предназнаяен не для АБС а для турбо Паскаля, Объявляет что в программе будет использоваться рандом.

[Базиля]

На счет рэндомайза точно сказать не могу но вроде, он предназнаяен не для АБС а для турбо Паскаля, Объявляет что в программе будет использоваться рандом.

Да да все верно. В ABC не обязательно объявлять эту процедуру для использования рандома.

[Викаа-008]

Понятно)))) Спасибо всем большое!!! Благодаря вам, мне может завтра информатику автоматом засчитают))))

[iBuTTHead]

Везет, мне бы так.)

[Викаа-008]

Тебе тоже повезет))