Форум программистов
 
Расширенный поиск
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Новички в программировании > Помощь студентам
Регистрация

Восстановить пароль
Повторная активизация e-mail

Ответ
 
Опции темы
Старый 09.01.2013, 12:23   #1
spinogryz_ua
Форумчанин
 
Аватар для spinogryz_ua
 
Регистрация: 14.01.2012
Адрес: Украина, Черкассы
Сообщений: 150
Репутация: 4

icq: 620304630
skype: spinogriz_ua
Сообщение Random (pascal)

Есть такой вопрос:

Как в паскале задать пределы рандома для типа char?
К примеру для int, я задаю пределы так:
Код:

a:=random(25)-5;

А как же быть с символами?
spinogryz_ua вне форума   Ответить с цитированием
Старый 09.01.2013, 12:43   #2
kventin_zhuk
БНТУ ФИТР
Форумчанин
 
Аватар для kventin_zhuk
 
Регистрация: 20.05.2012
Адрес: Belarus, Minsk
Сообщений: 315
Репутация: 90

icq: 564747449
skype: kventin_zhuk
По умолчанию

Код:

var
  a: char;
  b:integer;
begin
  randomize;
  b := random(256);
  a := chr(b);
  writeln (a);
end.

__________________
С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog.
< ----- Контакты
kventin_zhuk@live.com
kventin_zhuk вне форума   Ответить с цитированием
Старый 09.01.2013, 12:48   #3
spinogryz_ua
Форумчанин
 
Аватар для spinogryz_ua
 
Регистрация: 14.01.2012
Адрес: Украина, Черкассы
Сообщений: 150
Репутация: 4

icq: 620304630
skype: spinogriz_ua
По умолчанию

А как понять в каких пределах будут рандмится символы?
Можно ли как то сделать что бы символы были только от "A" до "Z"?
spinogryz_ua вне форума   Ответить с цитированием
Старый 09.01.2013, 12:55   #4
kventin_zhuk
БНТУ ФИТР
Форумчанин
 
Аватар для kventin_zhuk
 
Регистрация: 20.05.2012
Адрес: Belarus, Minsk
Сообщений: 315
Репутация: 90

icq: 564747449
skype: kventin_zhuk
По умолчанию

Код:

var
  a: char;
  b:integer;
begin
  randomize;
  b := random(25) + 65;
  a := chr(b);
  writeln (a);
end.

65- код символа А в таблице ASCII. Получается с 65-го символа генерируем +25.
__________________
С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog.
< ----- Контакты
kventin_zhuk@live.com
kventin_zhuk вне форума   Ответить с цитированием
Старый 09.01.2013, 13:04   #5
spinogryz_ua
Форумчанин
 
Аватар для spinogryz_ua
 
Регистрация: 14.01.2012
Адрес: Украина, Черкассы
Сообщений: 150
Репутация: 4

icq: 620304630
skype: spinogriz_ua
По умолчанию

Помогли.
Благодарю!
spinogryz_ua вне форума   Ответить с цитированием
Старый 09.01.2013, 13:46   #6
phomm
personality
Профессионал
 
Аватар для phomm
 
Регистрация: 28.04.2009
Адрес: Тюмень
Сообщений: 2,854
Репутация: 1511

icq: 421049471
skype: phomm-
По умолчанию

Тогда уж
Код:

b := random(26) + 65;

Английских букв-то 26
phomm вне форума   Ответить с цитированием
Старый 09.01.2013, 13:50   #7
kventin_zhuk
БНТУ ФИТР
Форумчанин
 
Аватар для kventin_zhuk
 
Регистрация: 20.05.2012
Адрес: Belarus, Minsk
Сообщений: 315
Репутация: 90

icq: 564747449
skype: kventin_zhuk
По умолчанию

Цитата:
Сообщение от phomm Посмотреть сообщение
Тогда уж
Код:

b := random(26) + 65;

Английских букв-то 26
молодца) мой косяк
__________________
С++(console/builder/WinAPI/Linux), C#, Pascal, Delphi, Asm, Prolog.
< ----- Контакты
kventin_zhuk@live.com
kventin_zhuk вне форума   Ответить с цитированием
Ответ



Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
в Pascal ABC.Net ошибка:"невозможно явно преобразовать тип integer к System.random" ameks94 Паскаль 3 23.12.2012 02:04
random Zheka95 Общие вопросы Delphi 4 10.06.2012 19:10
pascal random S0ap Помощь студентам 2 10.07.2011 17:49
Random ограничения (pascal) _fynjy_ Помощь студентам 24 11.01.2011 11:19
"Random" в матрице (Turbo Pascal) JIUMOH Помощь студентам 3 29.12.2009 12:35




16:49.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.

купить трафик


как улучшить посещаемость, а также решения по монетизации сайтов, видео и приложений

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru