andro A andro Регистрация 23 Ноя 2013 Сообщения 81 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #1 Решил в прекрасный день поиграть с паскалем. Но, появилась надобность, чтобы этот код не завершался в конце программы, а повторялся. Код: program randomaizer; begin write(random(100)); end.
Решил в прекрасный день поиграть с паскалем. Но, появилась надобность, чтобы этот код не завершался в конце программы, а повторялся. Код: program randomaizer; begin write(random(100)); end.
maks2233 M maks2233 Регистрация 22 Авг 2013 Сообщения 78 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #2 там вроде var i:integer;(не помню как переменную завести) begin for i:=1 to i>2 do begin; write(random(100)); end; end. Позитивный голос 0
там вроде var i:integer;(не помню как переменную завести) begin for i:=1 to i>2 do begin; write(random(100)); end; end.
GFHGFH G GFHGFH Регистрация 17 Янв 2013 Сообщения 79 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #3 Repeat Until Keypressed; Позитивный голос 0
Илья13 И Илья13 Регистрация 3 Ноя 2013 Сообщения 93 Репутация -3 Спасибо 0 Монет 0 6 Янв 2019 #4 надо сделать бесконечный цикл Позитивный голос 0
asdasd A asdasd Регистрация 7 Июн 2013 Сообщения 95 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #5 1: write(random(8)); goto 1 Позитивный голос 0
Chiter777 C Chiter777 Регистрация 21 Окт 2013 Сообщения 71 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #6 Можно добавить цикл на кучу повторений, но бесконечно нельзя, ибо в паскале нету функции перезапуска программы. Позитивный голос 0
Можно добавить цикл на кучу повторений, но бесконечно нельзя, ибо в паскале нету функции перезапуска программы.