Вспомнил про придуманный мной куайн на Паскале.. А ведь можно ещё проще.
begin
randomize;
repeat
write(chr(random(80));
until keypressed;
end.
Вспомнил про придуманный мной куайн на Паскале.. А ведь можно ещё проще.
begin
randomize;
repeat
write(chr(random(80));
until keypressed;
end.
var i:byte;
begin
randomize;
for i:=1 to 87 do write(chr(random(68)+10));
end.
В первом варианте программы аргументом для Chr были элементы целочисленного массива. Прошло 20 лет(программа писалась в студенческие годыы). Решил её в учебных целях восстановить. И тут подумалось а где в постановке задачи сказано, что программа должна выводить требуемое при каждом запуске?! 🙂
Считаю абсолютной нелепицей использование QBasic-а в школьном курсе информатики. Тем не менее этот уродец фактически является стандартом для выпускников (будущих абитуриентов). Генетическое уродство усугубляется невразумительной реализацией. Удивительно каким образом это ПО получило одобрение Минобраза как учебное средство. Так что товарищи школьники а также их родители. если вы собираетесь сдавать ЕГЭ по информатике, настоятельно рекомендую навыки в программировании ставить на Паскале. Не обольщайтесь кажущейся легкостью изучения QBasic-а, «родимые пятна»этого ПО при написании любой программы, а тем более неопытной рукой, неизбежно повлекут наличие «блох», за которые Вам всенепременно въедливый экзаменатор сминусует балл, а то и два (я имею в виду решение третьей части ЕГЭ, задачи С1-С4). Впрочем и при решении заданий А и B, с элементами кода решение варианта на QBasic изначально более проблематично.
У меня есть издание 1992 года (тогда Паскаль был версии 5,5) Но наверняка это замечательное справочное пособие выдержало не одно переиздание. Уже лет 10 не покупаю и не читаю книг по программированию. Потому как смысла нет. Как правило это наспех надёрганные куски из справок того или иного программного обеспечения. А вот рассматриваемый учебник (именно учебник) очень полезен и как справочник и как обучающее пособие. Так что если Вы решии самостоятельно осваивать азы программирования, то качайте Фрипаскаль и открывайте эту книгу. И всё у Вас получится!