Как сделать чтобы программа выводила разные числа

@WereWolf81195 · Регистрация: 26.09.2012

Author24 — интернет-сервис помощи студентам

Как сделать чтобы программа выводила разные символы?=)

HighPredator · 26.09.2012, 21:14

WereWolf81195, точнее формулируйте задачу: куда выводить? Какие символы?

@TheSN · 26.09.2012, 21:21

Pascal

var
  i, n: integer;
 
begin
  randomize;
  writeln('Сколько букв вывести?');
  readln(n);
  for i := 1 to n do
    write(chr(ord('А') + random(32)):5);
  readln; 
end.

@WereWolf81195 · 26.09.2012, 21:22 **[ТС]**

Просто хочу сделать прикольную прогу "Матрица" мне надо чтобы в окно программы спомощью write или writeln выводился кажды раз меняющийся текст=)

@TheSN · 26.09.2012, 21:30

Pascal

const
  n = 200000;  // число повторений
 
var
  i: integer;
 
begin
  randomize;
  for i := 1 to n do 
  begin
    case random(4) of
      0: write(0);
      1: write(1);
    else write(' ')
    end
  end
end.

@WereWolf81195 · 26.09.2012, 21:52 **[ТС]**

Сообщение от TheSN

Pascal

const
  n = 200000;
var
  i: integer;
begin
  randomize;
  for i := 1 to n do 
  begin
   case random(4) of
    0: write(0);
    1: write(1);
   else write(' ')
  end
 end
end.

Изменил на

Pascal

uses crt;
const
  n = 200000;
var
  i: integer;
begin
  textbackground (0);
  textcolor (2);
  randomize;
  for i := 1 to n do 
  begin
  case random(4) of
     0: write(chr(ord('А') + random(32)):5);
  end
  end
end.

Так красиво но быстро заканчивается=(

@TheSN · 26.09.2012, 21:56

Увеличьте n раз в 10.

@WereWolf81195 · 26.09.2012, 22:02 **[ТС]**

Ошибка из-за увеличения!=(

Добавлено через 41 секунду
может как-нибудь сделать чтобы код повторялся=)

@TheSN · 26.09.2012, 22:07

Pascal

uses crt;
begin
  textbackground(0);
  textcolor(2);
  randomize;
  while true do 
    write(chr(ord('А') + random(32)):4);  
end.

@WereWolf81195 · 26.09.2012, 22:14 **[ТС]**

Классно!!!!=)

@WereWolf81195 0 / 0 / 0 Регистрация: 26.09.2012 Сообщений: 51
		1
	Как сделать чтобы программа выводила разные числа 26.09.2012, 21:11. Показов 2457. Ответов 9 Метки нет (Все метки) Как сделать чтобы программа выводила разные символы?=) 0

HighPredator 6045 / 2160 / 753 Регистрация: 10.12.2010 Сообщений: 6,005 Записей в блоге: 3
	26.09.2012, 21:14	2
	WereWolf81195, точнее формулируйте задачу: куда выводить? Какие символы? 0

@WereWolf81195 0 / 0 / 0 Регистрация: 26.09.2012 Сообщений: 51
	26.09.2012, 21:22 [ТС]	4
	Просто хочу сделать прикольную прогу "Матрица" мне надо чтобы в окно программы спомощью write или writeln выводился кажды раз меняющийся текст=) 0

@TheSN 155 / 97 / 101 Регистрация: 25.02.2012 Сообщений: 232
	26.09.2012, 21:56	7
	Увеличьте n раз в 10. 0

@WereWolf81195 0 / 0 / 0 Регистрация: 26.09.2012 Сообщений: 51
	26.09.2012, 22:02 [ТС]	8
	Ошибка из-за увеличения!=( Добавлено через 41 секунду может как-нибудь сделать чтобы код повторялся=) 0

@WereWolf81195 0 / 0 / 0 Регистрация: 26.09.2012 Сообщений: 51
	26.09.2012, 22:14 [ТС]	10
	Классно!!!!=) 0