A andro Регистрация 23 Ноя 2013 Сообщения 71 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #1 Решил в прекрасный день поиграть с паскалем. Но, появилась надобность, чтобы этот код не завершался в конце программы, а повторялся. Код: program randomaizer; begin write(random(100)); end.
Решил в прекрасный день поиграть с паскалем. Но, появилась надобность, чтобы этот код не завершался в конце программы, а повторялся. Код: program randomaizer; begin write(random(100)); end.
M maks2233 Регистрация 22 Авг 2013 Сообщения 72 Репутация 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.
G GFHGFH Регистрация 17 Янв 2013 Сообщения 69 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #3 Repeat Until Keypressed; Позитивный голос 0
И Илья13 Регистрация 3 Ноя 2013 Сообщения 83 Репутация -3 Спасибо 0 Монет 0 6 Янв 2019 #4 надо сделать бесконечный цикл Позитивный голос 0
A asdasd Регистрация 7 Июн 2013 Сообщения 87 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #5 1: write(random(8)); goto 1 Позитивный голос 0
C Chiter777 Регистрация 21 Окт 2013 Сообщения 66 Репутация 0 Спасибо 0 Монет 0 6 Янв 2019 #6 Можно добавить цикл на кучу повторений, но бесконечно нельзя, ибо в паскале нету функции перезапуска программы. Позитивный голос 0
Можно добавить цикл на кучу повторений, но бесконечно нельзя, ибо в паскале нету функции перезапуска программы.