VPF::Заполнение матрицы - Форум программистов

UpL1nK

Дата 26.12.2005, 21:49 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 102
Регистрация: 3.12.2005
Где: Тюмень

Репутация: нет
Всего: нет

Обьясните плз , как рандомно заполнить матрицу и числами и буквами(латинскими)
знаю тока :
for i:=1 to n do begin
for j:=1 to n do
x[i,j]:=random(100)
Это числа , а вот как буквы. да еще и вместе с числами ?!?

--------------------

Макс

newalex

Дата 27.12.2005, 00:00 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 92
Регистрация: 15.11.2005

Репутация: нет
Всего: нет

Смотри функции Ord и Chr. Они тебе явно помогут... smile

Это сообщение отредактировал(а) newalex - 27.12.2005, 00:01

Zero

Дата 27.12.2005, 00:01 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Завсегдатай
Сообщений: 2169
Регистрация: 23.10.2004
Где: Россия, г. Рязань

Репутация: нет
Всего: 24

Цитата(UpL1nK @ 26.12.2005, 22:49)

а вот как буквы. да еще и вместе с числами ?!?

Легко, по номеру полученому рандомом, берёшь значение соответствующее номеру из таблицы ASCII

Код


...
randomize;
...
for i:=1 to n do begin
  for j:=1 to n do
    x[i,j]:=chr(random(36)+48)  {со здвигом на 48, т.к. первая нужная цифра начинается от 48-го символа}

Добавлено @ 00:03
При этом имей ввиду, что массив х, типа char

Код


  x:array[1..n] of char;

Это сообщение отредактировал(а) Zero - 27.12.2005, 00:02

UpL1nK

Дата 27.12.2005, 08:55 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

Профиль
Группа: Участник
Сообщений: 102
Регистрация: 3.12.2005
Где: Тюмень

Репутация: нет
Всего: нет

Спасибо большое !
Но у меня возникла проблема, по задаче мне надо проверить К-ую строку , если в ней все числа нечетные то возвращаем ТРУ, но когда я пишу m[i,j] mod 2 <> 0 или odd(m[i,j]) компилятор говорит что не подходит тип , поскольку сама матрица char типа , a mod и odd неприемлимы , это как-нибудь можно исправить ?

--------------------

Макс

Albinos_x

Дата 27.12.2005, 10:43 (ссылка)

(нет голосов)

Загрузка ...

Evil Skynet

Профиль
Группа: Комодератор
Сообщений: 3288
Регистрация: 28.5.2004
Где: X-6120400 Y-1 4624650

Репутация: нет
Всего: 108

Цитата(UpL1nK @ 27.12.2005, 08:55)

но когда я пишу m[i,j] mod 2 <> 0 или odd(m[i,j]) компилятор говорит что не подходит тип , поскольку сама матрица char типа , a mod и odd неприемлимы , это как-нибуд

Код


... (ord(m[i,j]) mod 2)<>0 ...

--------------------

"Кто владеет информацией, тот владеет миром"
Уинстон Черчилль

volvo877

Дата 27.12.2005, 13:24 (ссылка)

(нет голосов)

Загрузка ...

Эксперт

Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 2
Всего: 116

Если

Цитата(UpL1nK @ 27.12.2005, 07:55)

по задаче мне надо проверить К-ую строку , если в ней все числа нечетные то возвращаем ТРУ

, то сначала проверяй, является ли символ цифрой, а уж потом - четной или нечетной...

Кстати, этот способ:

Цитата(Zero @ 26.12.2005, 23:01)

x[i,j]:=chr(random(36)+48)

заполнит матрицу не только буквами или цифрами... Между '9' и 'A' в таблице Ascii есть еще 7 символов, которые НЕ являются ни буквами, ни цифрами: ':;<=>?@'... Если тебе нежелательно, чтобы это попало в массив, то надо сделать чуть-чуть иначе...

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Object Pascal: кроссплатформенные технологии \| Следующая тема »