Родились сегодня:
lSemperFi


Лидеры рейтинга

ID: 259041

Алексеев Владимир Николаевич

Мастер-Эксперт

391

Россия, пос. Теплоозёрск, ЕАО


ID: 401284

Михаил Александров

Советник

379

Россия, Санкт-Петербург


ID: 401888

puporev

Профессор

215

Россия, Пермский край


ID: 400669

epimkin

Профессионал

111


ID: 405338

vovaromanov.jr

1-й класс

103


ID: 242862

Hunter7007

Мастер-Эксперт

29

Россия, Омск


ID: 137394

Megaloman

Мастер-Эксперт

25

Беларусь, Гомель


8.10.2

13.10.2021

JS: 2.10.2
CSS: 4.6.0
jQuery: 3.6.0
DataForLocalStorage: 2021-10-27 22:16:01-standard


Создание программ на языках Pascal, Delphi и Lazarus.

Администратор раздела: Зенченко Константин Николаевич (Старший модератор)

Консультация онлайн # 160407

Раздел: Pascal / Delphi / Lazarus
Автор вопроса: Пракамова Виктория Александровна
Дата: 13.02.2009, 21:52 Консультация закрыта
Поступило ответов: 0

Здравствуйте, уважаемые эксперты!
Пытаюсь заполнить матрицу случайными числами:

for i := 0 to Form1.n - 1 do
for j := 0 to Form1.n - 1 do
Form3.A[i,j]:=(Random-0.5)*200;

на последней строке появляется ошибка
[Pascal Error] random.pas(60): E2029 '.' expected but '-' found

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

Ответов пока не поступило
Мини-форум консультации # 160407
неизвестный

1

= общий =    13.02.2009, 22:40

Motoden, поставила скобки:
for i := 0 to Form1.n - 1 do
for j := 0 to Form1.n - 1 do
Form3.A[i,j]:=(Random()-0.5)*200;
теперь ошибка выглядит так:
[Pascal Error] random.pas(60): E2029 '.' expected but '(' found

собственно, ничего не изменилось(

Monah

2

= общий =    14.02.2009, 15:47

А какая версия Дефи? Мне кажется что старше 7, тогда random возможно не функция, а класс . Компилятор требует точку после random..

Micren

3

= общий =    14.02.2009, 16:35

Не обязательно ставить () после функции Random. Это ничего не изменит. Компилятор ожидает увидеть '.' . Похоже, что он ожидает увидеть член класса. Хотелось бы увидеть Вашу форму в более полном объеме и тогда можно будет сделать выводы.

Minin Andrey Georgievich

4

= общий =    14.02.2009, 21:38

for i := 0 to Form1.n - 1 do
for j := 0 to Form1.n - 1 do
Form3.A[i,j]:=(Random-0.5)*200;

на Delphi7 код успешно работает . Согласен с более ранними высказываниями

Monah

5

= общий =    14.02.2009, 21:50

Я же говорю, надо узнать версию делфи

неизвестный

6

= общий =    14.02.2009, 22:15

уважаемые эксперты, проблема решена. оказалось, я додумалась назвать этот модуль random.

код:
for i := 0 to Form1.n - 1 do
for j := 0 to Form1.n - 1 do
Form3.A[i,j]:=(System.Random()-0.5)*200;
заработал.

Micren

7

= общий =    14.02.2009, 22:23

Народ, хватит воду мутить.
Пракамова Виктория Александровна,обратите внимание на то, что имя Вашего файла называется random.pas
Подозреваю, что в начале файла у Вас есть строка program random;
Доходит?
Имя Random переопределено в Вашей программе. Сотрите строку program random вообще.

Micren

8

= общий =    14.02.2009, 22:24

Да Вы и сами догадались.

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

Лучшие эксперты раздела

puporev

Профессор

Рейтинг: 215

Зенченко Константин Николаевич

Старший модератор

Рейтинг: 162

Gluck

9-й класс

Рейтинг: 81

Лысков Игорь Витальевич

Мастер-Эксперт

Рейтинг: 0

Асмик Гаряка

Советник

Рейтинг: 0

Орловский Дмитрий

Мастер-Эксперт

Рейтинг: 0