Страница 1 из 1

Выводить на экран строку, состоящую из случайного (до 25)...

Добавлено: 15 май 2013, 14:36
Asya_Teddy
Выводить на экран строку, состоящую из случайного (до 25) числа повторений заданного символа. Вывод окончить при повторении подряд двух строк с одинаковым числом символов.

Re: Выводить на экран строку, состоящую из случайного (до 25)...

Добавлено: 15 май 2013, 17:41
Хыиуду

Код: Выделить всё

i:=0;
repeat
    j:=i;
    i:=random(25)+1;
    for c:=1 to i do write('a');
    writeln;
until i=j;    

Re: Выводить на экран строку, состоящую из случайного (до 25)...

Добавлено: 15 май 2013, 18:12
Asya_Teddy
спасибо, но не могли бы вы всю программу полностью написать?

Re: Выводить на экран строку, состоящую из случайного (до 25)...

Добавлено: 16 май 2013, 14:50
Хыиуду
Мог бы, но не хочу. Надо и своей головой думать.