Автор: Rika 30.11.2003 1:33
Привет всем. У меня никак не выходит решить задачу. Если кто знает, как её решать – помогите, плизззз.
Задача:
С помощью датчика случайных чисел на интервале (-250; 100) получить целочисленный массив , состоящий из 320 элементов.
Автор: SKVOZNJAK 30.11.2003 17:48
Код
VAR Q: INTEGER;
A: ARRAY [1..320] OF INTEGER;
BEGIN
RANDOMIZE;
FOR Q:=1 TO 320 DO A[Q]:=RANDOM(351)-250;
{FOR Q:=1 TO 320 DO WRITE(' ',A[Q]); ПРОВЕРКА РЕЗУЛЬТАТА}
END.
Ну и что здесь сложного?