Решил написать статью о том, как работает генератор случайных чисел. С помощью функции Random можно узнать какое «случайное» число выдаст программа.

(читать всё…)

Помогите, пожалуйста, решить задачи на массивы в паскале:
1.Заполнить массив случайными числами
2.Заполнить массив квадратами чисел от 1 до 10
3.Посчитать сумму значений элементов массива(предварительно задать массив)
4.Вычислить значение разности последнего и первого элемента в массиве
5.вычислить из заданного массива каждый второй элемент в другой массив
(читать всё…)

как генерировать случайные положительные и отрицательные числа?
RandomRange конечно хорош, но он генерит целые числа. да, могу я и с ним поработать через коэфициенты, но есть ли способы полегче? (читать всё…)

doktor255

var f: TextFile;

i, k: integer;

begin

  AssignFile(f,'c:\file.txt');

  Rewrite(f);

  for i:=1 to 15 do begin

    k := Random(5)-2;

    WriteLn(f, IntToStr(k));

  end;

  CloseFile(f);

тема на форуме

Мне нужно чтобы программа генерировала случайные числа/англ буквы, общее количество символов «ключа» должно быть 32символа.

1234567890qwertyuiopasdfghjklzxcvbn m (только цифры и маленькие англ буквы). Также нужно самому указывать количество «ключей» для генерации в Edit1, как сделать такой генератор? (читать всё…)

К примеру число 53, как это сделать? (читать всё…)

(читать всё…)

при выполнеи его первое значение random получаеться равным «0», как сделать так чтоб значения были более рандомные, или заставить рандом повториться несколько раз а только потом выдавать значение (читать всё…)